rep()

rep()重复函数，重复1-3，重复5次
factor = factor(rep(c(1:3),times=5))
factor

sample()

sample()随机取样；从100中随机取15个
X = sample(100,15)

tapply()

tapply()为向量中的每个因子变量计算一个度量值(均值、中值、最小值、最大值等)或一个函数。这是一个非常有用的函数它可以让你创建一个向量的子集然后对每个子集应用一些函数。
?tapply
tapply(X,factor,mean)

cbind()

cbind()把矩阵横向合并成一个大矩阵（列方式），而rbind()是纵向合并（行方式）。
rbind(X,factor)
boo = rbind(X,factor)[2,]==1
which(boo)
rbind(X,factor)[1,which(boo)]
sum(rbind(X,factor)[1,which(boo)])/length(which(boo))