aggregate函数是处理数据框的强大工具：
aggregate Function in R- A powerful tool for data frames
基本函数格式如下：
aggregate(x = any_data, by = group_list, FUN = any_function)
x: 要处理的数据框
by: list格式，与行对应，主要是将数据分组处理
FUN: 处理函数
Example 1: Compute Mean by Group Using aggregate Function计算组平均数
data <- iris
head(data)
Sepal.Length Sepal.Width Petal.Length Petal.Width Species
1 5.1 3.5 1.4 0.2 setosa
2 4.9 3.0 1.4 0.2 setosa
3 4.7 3.2 1.3 0.2 setosa
4 4.6 3.1 1.5 0.2 setosa
5 5.0 3.6 1.4 0.2 setosa
6 5.4 3.9 1.7 0.4 setosa
aggregate(x = data[, colnames(data) != "Species"],
by = list(data$Species),
FUN = mean)
Group.1 Sepal.Length Sepal.Width Petal.Length Petal.Width
1 setosa 5.006 3.428 1.462 0.246
2 versicolor 5.936 2.770 4.260 1.326
3 virginica 6.588 2.974 5.552 2.026
FUN可以用其他的函数，比如sum，sd之类的。
NA的处理
可以忽略数据中的NA，如果没有这个选项，会产生NA值。
aggregate(x = data1[ , colnames(data1) != "Species"],
by = list(data1$Species),
FUN = mean,
na.rm = TRUE)
