U1A1.R

#Primer script de la clase de probabilidad y estadistica
#26/06/2020
#River Torres

#Establecer folder te trabajo
setwd("~/Probabilidad y Estadistica")

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

#Primer Grafica con R
#Para esto utilizaremos la base de datos mpg(Millas por galon)
#Usando ggplot

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