函数rosnerTest聚合

Question

我犯了个错误

当我试图从包rosnerTest中使用EnvStats时，“if (任意(异常值))中的错误”{：在真/假需要的地方缺少值“。

out1 <- aggregate(x = df$Price, by = list(df$Item), FUN = rosnerTest)

我试图使用聚合函数来代替使用for循环来进行rosner测试，因为我的数据有超过1400万条记录，有大约300万条唯一的条目。

Answer 1

试一试tapply：

out1 <- tapply(df$Price, df$Item, rosnerTest)

Answer 2

这是很久以前的事了，但也许它仍然能帮到某人：

我得到了同样的错误，因为在某些行中没有异常值(例如，所有值都是相同的)。在for循环中，可以使用try()函数忽略这些错误，循环将继续到下一行。