Усреднение ежедневных данных в недельные данные
Мне интересно, есть ли способ усреднить ежедневные данные в недельные данные. Фрейм данных, который я называю CADaily, выглядит следующим образом:
> CADaily[1:10, ]
Climate_Division Date Rain
885 1 1948-07-01 0.8750000
892 1 1948-07-02 2.9166667
894 1 1948-07-03 0.7916667
895 1 1948-07-04 0.4305556
898 1 1948-07-05 0.8262061
901 1 1948-07-06 0.5972222
904 1 1948-07-17 0.04166667
905 1 1948-07-18 0.08333333
907 1 1948-07-20 0.04166667
909 1 1948-07-22 0.12500000
910 1 1948-07-21 NA
Моя цель похожа на функцию агрегирования, чтобы найти среднее значение ежедневного дождя в значениях еженедельного дождя на основе даты (конечно) и Climate_Division (в диапазоне от 1 до 7). Я искал в Интернете, и я нашел код, который я мог использовать, но неЭто вполне соответствует моей цели:
apply.weekly(xts(CADaily[,-2], order.by= CADaily[,2]), FUN = mean)
Это делает то, что я хотел бы, однако мой столбец Climate_Division также усредняется. Я просто хотел бы усреднить только дождь и заказать его на основе Climate_Division, а затем Дата. Есть ли способ, которым я могу сделать это следующим образом:
aggregate(CADaily, by =list(CADaily$Climate_Division, CADaily$Date), FUN = mean, na.rm = TRUE)
где дата в какой-то форме недели? Или есть другой способ?
РЕДАКТИРОВАТЬ:
Дорогие все,
Спасибо за помощь. Возможно с использованием агрегата развеt лучший способ сделать это, как я изначально думал. Что касается результатов, я хотел получить средненедельное количество осадков за все годы данных (1948 - 1995). Другими словами, я хотел получить хороший формат, который я мог бы вводить во временные ряды, которые имеют форму даты конца недели. Результат, который я ищу (имея в виду, что могут существовать значения NA):
Climate_Division Date Rain
1 1948-07-03 1.527778
1 1948-07-10 0.6179946
1 1948-07-17 0.04166667
1 1948-07-24 0.08333333
...
1 1995-12-23 0.24513245
1 1995-12-30 0.12450545
Или есть лучший способ выражения еженедельных данных, которые представлены датами?
Спасибо за помощь.