Ответ 1
Самый простой способ - использовать функцию apply.weekly
из xts
.
> apply.weekly(zoo(1:10, as.Date("2010-01-01") + 1:10), mean)
2010-01-03 2010-01-10 2010-01-11
3 42 10
В R я часто собираю суточные данные (в zoo
) по месяцам, используя что-то вроде этого:
result <- aggregate(x, as.yearmon, "mean", na.rm=TRUE)
Есть ли способ, которым я могу это сделать через неделю?
Самый простой способ - использовать функцию apply.weekly
из xts
.
> apply.weekly(zoo(1:10, as.Date("2010-01-01") + 1:10), mean)
2010-01-03 2010-01-10 2010-01-11
3 42 10