This preview shows pages 1–2. Sign up to view the full content.
This preview has intentionally blurred sections. Sign up to view the full version.
View Full Document
Unformatted text preview: for (i in 1:500) { means[i] < mean(runif(2)) } plot(0,0,type="n", xlim=c(0,1), ylim=c(0,10), xlab="density estimate", ylab="f(x)") lines(density(means)) means < c() for (i in 1:500) { means[i] < mean(runif(10)) } lines(density(means)) means < c() for (i in 1:500) { means[i] < mean(runif(17)) } lines(density(means)) means < c() for (i in 1:500) { means[i] < mean(runif(25)) } lines(density(means)) means < c() for (i in 1:500) { means[i] < mean(runif(50)) } lines(density(means)) means < c() for (i in 1:500) { means[i] < mean(runif(100)) } lines(density(means))...
View
Full
Document
This note was uploaded on 04/27/2009 for the course STAT 200 taught by Professor Agniel during the Spring '09 term at University of Illinois at Urbana–Champaign.
 Spring '09
 Agniel

Click to edit the document details