生成表

Question

我有以下數據幀：

test <- data.frame(Gender = rep(c("M","F"),5), Death = c(1981:1985), Age = c(21:30)) 

，我想知道我怎麼可以重現使用命令table，而不是ddply結果如下：

library(plyr) 
ddply(test, c("Gender", "Death"), summarise, AgeMean = mean(Age)) 
    Death AgeMean 
1 1981 23.5 
2 1982 24.5 
3 1983 25.5 
4 1984 26.5 
5 1985 27.5 

Answer 1

我想你的意思是aggregate ...

aggregate(Age ~ Death , data = test , FUN = mean) 
# Death Age 
#1 1981 23.5 
#2 1982 24.5 
#3 1983 25.5 
#4 1984 26.5 
#5 1985 27.5 

Answer 2

或你也可以使用summaryBy從doBy包：

summaryBy(Age ~ Death,data=test,FUN=mean) 
Death Age.mean 
1981 23.5 
1982 24.5 
1983 25.5 
1984 26.5 
1985 27.5 

變量（一個或多個）的~的左邊是要執行的功能FUN=（在這種情況下mean）變量（S）和~右側的變量是您想要的新聚合級別。

Answer 3

你也可以做到這一點使用dplyr：

library(dplyr) 

test %>% 
    group_by(Death) %>% 
    summarise(Age.mean = mean(Age)) 

我覺得dplyr的鏈接語法結果非常可讀的代碼，但是這是一個個人喜好。

Source: local data frame [5 x 2] 

    Death Age.mean 
1 1981  23.5 
2 1982  24.5 
3 1983  25.5 
4 1984  26.5 
5 1985  27.5