U1A1.R

# Script del primer ejercicio de la materia de PyE
# 26/08/2020
#ismael lopez barra 
# Ejercicio básico de graficación de variables


#Establecer folder de trabajo
setwd("~/1 EA1011") 

#Activar el paquete tidyverse
library(tidyverse)

## -- Attaching packages ------------------------------------------- tidyverse 1.3.0 --

## v ggplot2 3.3.2     v purrr   0.3.4
## v tibble  3.0.3     v dplyr   1.0.2
## v tidyr   1.1.1     v stringr 1.4.0
## v readr   1.3.1     v forcats 0.5.0

## -- Conflicts ---------------------------------------------- tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()

## -- Attaching packages --------------------- tidyverse 1.3.0 --
## v ggplot2 3.3.0     v purrr   0.3.3
## v tibble  2.1.3     v dplyr   1.0.0
## v tidyr   1.0.2     v stringr 1.4.0
## v readr   1.3.1     v forcats 0.4.0
## -- Conflicts ------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()
#Creación de la primer gráfica del tamaño del motor vs
#la eficiencia de uso de combustible en carretera

ggplot(data=mpg) +
  geom_point(mapping=aes(x=displ,y=hwy)) +
  ggtitle("mpg")

##conclusion
##Aqui se llevo a cabo la instalacion de la paqueteria
##tidyverse, para posteriormente poder ejecutar funciones 
##como graficas en este caso tratamos una problematica 
##de eficiencia contra tamaño del motor