#Primer ejercicio de estadistica aplicada
#U1A1
#28 de Agosto del 2020
#Jaime Corral
#
#En este ejercicio se tiene como objetivo que el estudiante se 
#familiarice con el entorno de Rstudio y el lenguaje R

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

#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 usar la biblioteca ggplot
#para hacer graficas, y la primer gráfica será 
#sobre el tamaño del motor vs la eficincia de 
#uso de combustible en carretera




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

# Redacción personal

#En este primer ejercicio elaboramos una grafica
#de un motor y su eficiencia en el uso de combustible.
#Este ejercicios nos sirvio para familiarizarnos con el
#ecosistema de RStudio.