агрегация кадра данных по столбцу

Question

У меня есть кадр данных, один из столбцов, представляющих годы. Скажем

region <- c("Spain", "Italy", "Norway") 
year <- c("2010","2011","2012","2010","2011","2012","2010","2011","2012") 
m1  <- c("10","11","12","13","14","15","16","17","18") 
m2  <- c("20","30","40","50","60","70","80","90","100") 
data <- data.frame(region,year,m1,m2) 

Я хочу объединить набор данных m1 таким образом, принимая 3-летние средние значения для каждой страны. Я смущен тем, как это сделать с фреймом данных. Любые комментарии высоко оценены. Спасибо заранее!

Answer 1

Во-первых, ваша переменная m1 должна быть числовой. Преобразовать его с помощью as.numeric():

data$m1 <- as.numeric(as.character(data$m1)) 

Затем вы можете использовать aggregate так:

aggregate(m1 ~ region, FUN = mean, data = data) 

# region m1 
# 1 Italy 14 
# 2 Norway 15 
# 3 Spain 13 

Чтобы избежать преобразования неуклюжим типа (as.numeric(as.character())), вы должны устранить цитаты из установки для m1 и m2 :

m1  <- c(10,11,12,13,14,15,16,17,18) 
m2  <- c(20,30,40,50,60,70,80,90,100) 

---

Альтернативный подход с использованием dplyr:

library(dplyr) 

region <- c("Spain", "Italy", "Norway") 
year <- c("2010","2011","2012","2010","2011","2012","2010","2011","2012") 
m1  <- c(10,11,12,13,14,15,16,17,18) 
m2  <- c(20,30,40,50,60,70,80,90,100) 
data <- data.frame(region,year,m1,m2) 

data %>% 
    group_by(region) %>% 
    summarise(mean_m1 = mean(m1), 
      mean_m2 = mean(m2)) 

# region mean_m1 mean_m2 
# 1 Italy  14  60 
# 2 Norway  15  70 
# 3 Spain  13  50