dcast 中输入多于 1 的自定义聚合函数

Customized aggregation function with more than 1 input in dcast

在 dcast 中是否可以使用具有多个输入的聚合函数,或者其他函数可以做到这一点?

例如

names(airquality) <- tolower(names(airquality))
aqm <- melt(airquality, id=c("month", "day"), na.rm=TRUE)

dcast(aqm, month ~ variable, mean)

如何使用按天加权的 "value" 的平均值进行计算?提前致谢。

正如 akrun 所建议的,我检查了其他问题的答案并且有效:

> aqm %>%
+     select(month, day, variable, value) %>%
+     group_by(month, variable) %>%
+     summarise(weight_avg = weighted.mean(value,day)) %>%
+     spread(variable, weight_avg)