R中的例子
require(stats)
require(graphics)
n <- 10
nn <- 100
g <- factor(round(n * runif(n * nn)))
# runif函数生成n*nn个0-1均匀分布数,这里就是生成1000个0-1分布的数
#round函数是用来四舍五入,默认取整数,这里取完整数后就是0到10的整数
#factor转化为因子,将0到10的整数转换为因子
x <- rnorm(n * nn) + sqrt(as.numeric(g))
#rnorm生成正态分布数
xg <- split(x, g)
#g是从0到10,一共11个数,这里split是将x分为11组
boxplot(xg, col = "lavender", notch = TRUE, varwidth = TRUE)
#boxplot画的是箱线图
sapply(xg, length)
#sapply是指对xg(xg是11个列表)的每一个列表算length
sapply(xg, mean)
代码里的箱线图
更多推荐
R语言中split()函数的例子
发布评论