Group_by () не группирует, как я ожидал - PullRequest
0 голосов
/ 11 ноября 2019

Я пытаюсь обобщить некоторые данные об осадках, используя пакет bomrang и tidyverse. Я пытался использовать dplyr::group_by(year), чтобы затем использовать summarise и mean для расчета среднегодового количества осадков. Но вместо того, чтобы получать другое среднегодовое значение, я получаю одинаковое среднее значение по всему фрейму данных.

# load the libraries
library(bomrang)
library(tidyverse)

# get the data
perth <- get_historical(009225, "rain")

# group by year and calculate average rainfall per year
perth %>% 
  select(station_number, year:day, rainfall) %>% 
  group_by(year) %>% 
  summarise(yearly_avg = mean(rainfall, na.rm = TRUE))

Я бы ожидал значение yearly_avg для каждого из 26 лет данных, например,1993 yearly_avg должен быть 2.032013, а 1994 будет 2.026849 и т. д.

Вместо этого я получаю только одно значение 2.002883. Я пытался использовать mutate и as.factor в год, чтобы увидеть, изменит ли это результат, но это не так.

...