iq | R Documentation |
IQ data for 80 countries. See pages 85-87
data(iq)
Lynn, R. and Vanhanen, T. (2001). National IQ and Economic Development. Mankind Quarterly LXI, 415-437.
## Not run: { data(iq) n <- length(iq[1,]) t.iq <- (iq[1,]-mean(as.numeric(iq)))/(sd(iq[1,])/sqrt(n)) r.t <- (rt(100000, n-1)*(sd(iq)/sqrt(n))) + mean(as.numeric(iq)) quantile(r.t,c(0.01,0.10,0.25,0.5,0.75,0.90,0.99)) r.sigma.sq <- 1/rgamma(100000,shape=(n-2)/2, rate=var(as.numeric(iq))*(n-1)/2) quantile(sqrt(r.sigma.sq), c(0.01,0.10,0.25,0.5,0.75,0.90,0.99)) } ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.