U1A1.R

# Primer script de la clase de probabilidad ISW.

# Establecer el folder de trabajo
setwd("~/Documents/Probabilidad y estadistica ")

# Cargar tidyverse
library(tidyverse)

## ── Attaching packages ───────────────────────────────────────────────────────────────────── tidyverse 1.3.0 ──

## ✓ ggplot2 3.3.2     ✓ purrr   0.3.4
## ✓ tibble  3.0.3     ✓ dplyr   1.0.2
## ✓ tidyr   1.1.2     ✓ stringr 1.4.0
## ✓ readr   1.3.1     ✓ 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 vamos a utilizar la base de datos
# mpg (miles per galon)

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