U1A1.R

#Script del primer ejercicio de PyE 
#26/08/2020
#Marian Gutiérrez
#Graficación de variables

#Establecer folder de trabajo
setwd("~/PyE")

#Activar 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()

#Creación de la primer gráfica del tamaño del motor vs 
#la eficiencia del uso de combustible en carretera.

ggplot(data=mpg) +
  geom_point(mapping=aes(x=displ,y=hwy))

#En este ejercicio elaboramos una gráfica, mediante el uso de las librería 
#tidyverse,en la cual se muestra la comparación de la cantidad de gasolina que
#consume un carro en carretera depenciendo del tamaño del motor.