##
## Examples: Completely Randomized Design (CRD)
## More details: demo(package='SK')
##
library(ScottKnott)
data(CRD1)
## From: formula
# Simple!
sk1 <- SK(y ~ x,
data=CRD1$dfm,
which='x')
boxplot(sk1)
# A little more elaborate!
boxplot(sk1,
mean.lwd=1.3,
mean.col='red')
# A little more!
boxplot(sk1,
mean.lwd=1.3,
mean.lty=2,
mean.col='red',
args.legend=list(x='bottomleft'))
# With point type!
boxplot(sk1,
mean.type='point')
boxplot(sk1,
mean.type='point',
mean.pch=19,
cex=1.5,
mean.col='red')
# With other point
boxplot(sk1,
mean.type='point',
mean.pch='+',
cex=2,
mean.col='blue',
args.legend=list(x='bottomleft'))
Run the code above in your browser using DataLab