如果只需要对行或列进行操作，用apply(x,1,mean)（1表示行2表示列）；如果是根据某个变量进行的分组计算，可以用tapply(x,分组变量,mean)，或者是data %>% group_by(分组变量) %>% summarise(xmean = mean(x))（不过这种方法需要安装并加载dplyr包）。