Displaying 1 result from an estimated 1 matches for "schaff".
Did you mean:
schafft
2008 Jun 09
1
Student Distribution and Funtion qt
Hello,
I am trying to calculate and plot mean and confidence intervall for a set of data. This is the code that I am currently using:
means <- sapply(data, mean, na.rm=TRUE)
n <- sapply(data,length)
stdev <- sqrt(sapply(data, var, na.rm=TRUE))
ciw <- qt(0.98, n) * stdev / sqrt(n)
par(mgp=c(2,0.6,0), las=2, fin=c(7,3), mai=c(1,0.5,0.2,0.2), cex=0.8)
plotCI(x=means, uiw=ciw,