#primer script de la clase de probabilidad y estadistica
#para ingenieria de Software
#26 AGO 2020 
#ANDREA FELIX CERVANTES

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

#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
#base de datos
#mps(millas por galon)

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