U1A1.R

#26/AGO/20 JORGE VALENZUELA PARRA
#Ejercicio básico de graficación de variables

#Establecer folder de trabajo
setwd("~/PyE3")

#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()

#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("Economía de Combustible en EU (1999-2008)")

#Redacción Personal

#En este ejercicio elaboramos una gráfica con las herramientas que nos da
#la biblioteca de tidyverse, con los datos de motores de automóviles de 
#autos americanos audi y su rendimiento de gasolina en la ciudad y en la
#carretera.
#Luego de esto se graficó y analizó lo que se muestra en la grafica.