Как заполнить выборочный контент в таблице?

Question

Я мог бы сделать это довольно легко в Excel, но я очень хочу взломать его в R. В принципе, это простая таблица с именами строк в качестве имен респондентов возрастной группы и столбцов в качестве двоичного индикатора (да/нет)

попытайтесь сравнить результаты некоторых подгрупп с итогом Im пытается суммировать три возрастные группы, включая от 25 до 29,30 до 34 и от 35 до 39, которые ответили «да» в опросе и подсчитали процент «да»

Я работаю сколько респондентов ответили «да» по всей выборке

Я попытался использовать apply ((x1,2 function (x) sum (head (x, 2: 4))). Однако это не сработало. может посоветовать более умный способ сделать это? Очень признателен!

x1 <- structure(c(15L, 29L, 44L, 48L, 32L, 27L, 27L, 27L, 24L, 33L, 
14L, 29L, 25L, 33L, 13L, 15L, 17L, 9L, 18L, 41L), .Dim = c(10L, 
2L), .Dimnames = structure(list(Q4Age = c("18 to 24", "25 to 29", 
"30 to 34", "35 to 39", "40 to 44", "45 to 49", "50 to 54", "55 to 59", 
"60 to 64", "65 and over"), Q12 = c("No", 
"Yes")), .Names = c("Q4Age", "Q12" 
)), class = "table") 


    #yes 
sum(x1[1:3,2]) 

#no 
sum(x1[1:3,1]) 

Answer 1

У вас просто есть дополнительная запятая в вашей прикладной функции. (Нет необходимости в , между function и его значение)

Однако, более просто, вы можете использовать colSums:

colSums(x1[1:2, ])