R中tapply函数
有时候,我们需要对组数据进行函数计算,怎么办?首先,创建一个分组因子用来识别每个对应的数据组;然后,使用R中tapply函数,它会把一个函数应用到每组数据。语法格式如下。
tapply(x, f, fun)
说明:x是一个向量,f是一个分组因子,fun是一个函数。函数返回一个对分组数据进行fun运算所得结果而构成的一个向量。
关于tapply函数,举例说明如下。
> data1 <- c(100, 200, 300, 400, 150, 180)
> sum(data1)
[1] 1330
> mean(data1)
[1] 221.6667
> f1 <- factor(c("A", "B", "A", "B", "A", "B"))
> tapply(data1, f1, sum)
A B
550 780
> tapply(data1, f1, mean)
A B
183.3333 260.0000
> tapply(data1, f1, length)
A B
3 3