2

我正在尝试在 R 中聚合这样的数据：

df = data.frame(c("a","a","a","a","a","b","b","b","b","b","c","c","c"))
colnames(df) = "f"
set.seed(10)
df$e = rnorm(13,20,5)

    f   e
1   a   20.09373
2   a   19.07874
3   a   13.14335
4   a   17.00416
5   a   21.47273
6   b   21.94897
7   b   13.95962
8   b   18.18162
9   b   11.86664
10  b   18.71761
11  c   25.50890
12  c   23.77891
13  c   18.80883

我想按列f聚合，并为每个唯一的f类型（即产生 3 行数据）有一个修剪后的e平均值。

我试过：

df2=data.frame(0) 
df2=aggregate(df$e, by = "f",mean(df$e, trim=0.1))

收到以下错误：

Error in match.fun(FUN) : 
  'mean(df$e, trim = 0.1)' is not a function, character or symbol

在网上搜索了几遍，结果都是空的。我的实际数据由大约 30 个e per f值组成，所以我不担心它trim=0.1实际上不会修剪示例中的平均值（因为没有点位于上和下 5 个百分位之外）它会与真实数据一起使用，这个只是为了让聚合函数按预期工作。谢谢！

4

1 回答 1

4

试试这个

df2=aggregate(e~f,data=df,mean,trim=0.1)
  f        e
1 a 18.15854
2 b 16.93489
3 c 22.69888

在这种情况下用于计算的函数可以仅通过其名称给出，例如 ，mean并且该函数所需的附加参数设置在逗号之后。

于 2013-03-27T15:23:30.120 回答