#Primer ejercicio de estadistica aplicada
# U1A1
#Gramática de gráficas
# 28 de Agosto 2020
#Alexis Jocobi

# En este ejercicio se tiene como objetivo que el alumno se familiarice con el lenguaje 
# de R

#Vamos a usar los datos de mpg que son datos de economía del combustible, en 
# millas por galon (mpg)

#para esto vamos a usar la biblioteca ggplt contenida en 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()
library(tidyverse)

# Para esto vamos usar la biblioteca ggplot para hacer gráficas


ggplot(data=mpg) +
  geom_point(mapping = aes(x=displ, y=hwy)) +
  ggtitle("Economía del combustible (mpg)")