The companion density plot

library(dplyr)
glimpse(faithful)
## Observations: 272
## Variables: 2
## $ eruptions (dbl) 3.600, 1.800, 3.333, 2.283, 4.533, 2.883, 4.700, 3.6...
## $ waiting   (dbl) 79, 54, 74, 62, 85, 55, 88, 85, 51, 85, 54, 84, 78, ...
head(faithful)
##   eruptions waiting
## 1     3.600      79
## 2     1.800      54
## 3     3.333      74
## 4     2.283      62
## 5     4.533      85
## 6     2.883      55
d <- density(faithful$waiting) 
plot(d, main = "") 

plot of chunk unnamed-chunk-3

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos necesarios están marcados *

Post Navigation