U1A1.R

#Primer Ejercicio de Estadistica Aplicada
#Unidad 1 Asignacion 1 U1A1
#Gramatica de graficas
#28 de Agosto del 2020
#Jhoselyn Chávez Pacheco

#En este ejercicio se tiene como objetivo que el estudiante se familiarice con el 
#Entorno de R studio y el lenguaje R
#Vamos a utilizar datos de mpg que son datos de economia del combustible en millas por galon (mpg)

#Establecer directorio (carpeta) de trabajo
#setwd("~/ESTADISTICA APLICADA")
#Para esto usaremos la biblioteca ggplot que esta 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 vamosa a usar la biblioteca ggplot para hacer graficas
#Despues de ggplot escrbir mpg enter en la consola y despues ?mpg enter
ggplot(data=mpg) +
  geom_point(mapping = aes(x=displ, y=hwy)) + 
  ggtitle("Economía del combustible (mpg)")