U1A1.R

#primer ejercicio de estadistica aplicada
#U1A1
#gramatica de graficas
#Johana Dominguez


#En este ejercicio tiene como objetivo que el estudiante se familiarice
#vamos a usar datos los de mpg que son datos de economia del combustible,
#en millas por galon (mpg)
#para esto vamos a usar la bibloteca ggplot
#para hacer graficas
#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.2     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.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()
#Establece directorio de trabajo (setwd("~/R/ESTADISTICA APLICADA"))
ggplot(data=mpg)+
  geom_point(mapping=aes(x=displ, y=hwy))+
  ggtitle("economia del combustible(mpg)")