R中的tapply函数

我尝试将移动平均函数应用于一个变量，如下所示：

Fonction.mm <- function(x)
{
  filter(x, poids, sides=1, method="conv")
}

numero<-1:nrow(data)
tapply(numero, data$td, Fonction.mm)

---

非常感谢

在tapply中，第一个参数是数字，第二个是因子，第三个是您使用的函数

如果您想对td进行数值平均，那么表单是tapply（data$td，您的因子，fonction.mm）

---

还有，你的“兴趣点”是什么

请给出

numero

和

data$td

的示例数据。即便如此，错误也是显而易见的

numero

和

data$td

必须具有相同的长度。td val 2 38.553 2.313 1 7.559 1 95.648 1 7.559 td val 2 38.553 2 2.313 1 7.559 1 95.648 1 7.559 val是我移动平均的数值变量。numero是整个数据的行数请编辑您的问题。谢谢我更改了语法，但现在我得到：错误：无法分配大小为2.1 Mb/POID的向量是我选择的平均时间，并且没有真正释放内存。使用rm（object1，object2，…）删除那些占用大量内存的对象。或者启动一个新的R会话。如果可用内存超过4gb，也可以选择64位版本的R。如果这些都没有帮助，你就需要改进你的代码或者给你的计算机增加更多的内存（这可能不是问题所在）。

Error in tapply(numero, data$td, Fonction.mm) : 
  arguments must have same length