2013-05-07 18 views
2

我能做到這一點很容易在Excel中,但我很希望在R.基本上破解它,這是行名稱作爲受訪者的年齡組和列名作爲二進制指標簡單的表(是/否)如何彙總表中的選擇性內容?

的目的是比較一些亞組的結果與總數 我試圖總結三個年齡組,包括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]) 
+1

你只是有一個額外的逗號在那裏:'申請(X1,2,函數( x)sum(head(x,2)))'' – 2013-05-07 22:19:22

回答

4

你在你的應用函數中只需要一個額外的逗號。 (無需使用,function及其值之間)

然而,更簡單地說,你可以使用colSums

colSums(x1[1:2, ])