inst/snippets/Exploration10.5.4.R

Facebook.null <- do(1000) * coef(lm(shuffle(density) ~ friends, data = Facebook))
head(Facebook.null, 3)
dotPlot(~ friends, data = Facebook.null, n = 50, groups = (friends <= -0.201 | friends >= 0.201))
rpruim/ISIwithR documentation built on May 28, 2019, 1:30 a.m.