U1A1.R

#Primer ejercicio de estadistica aplicada
#U1A1
#Gramatica de gráficas 
#28 de agosto de 2020
#David Picos

#vamos a usar los datos de mpg que son datos de economia del
#combustible, en millas por galón (mpg)

#establecer directorio de trabajo
setwd("~/EA 10-11")


#para esto vamos a usar la biblioteca ggplot
#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()

#para esto vamos a utilizar la biblioteca ggplot
#para hacer gráficas
ggplot(data = mpg)+ 
  geom_point(mapping = aes(x=displ, y=hwy))+
  ggtitle("Economia del combustible (mpg)")