0.08, 0.1, 0.15, 0.17, 0.25) pop <- 1:n sam <- sample(pop,n*p) x <- rnorm(n) svg("one_sample_ttest.svg", width=10, height=2) par(mar=c(0,0,0,0)) plot(x...
