笔记测试,以后代码和相关资料直接放这里
# ---------demo6----------
# 在所有元素上应用函数 MARGIN=1:2
apply(iris[1:2,1:2], 1:2, sqrt)
data("iris")
iris[1,4]=NA
summary(iris) # 自动去掉缺失值的统计
by(iris[, 1:4], iris[,"Species"], summary) # 分组统计