使用spread或cast在R中创建因子级指标变量

Question

假设数据结构如下

MemberID <- c(123,123,234,234)
nbin <- 4
imatrix <- matrix(sample(c(0,1), size=nbin * length(MemberID), replace=TRUE), 
                  nrow=length(MemberID))
colnames(imatrix) <- letters[1:nbin]
years <- c("Y1","Y2","Y1","Y2")

mydf <- data.frame(cbind(MemberID, years, imatrix))

我如何制作类似的数据结构,以便我为每个a,b,c,d的每个级别都有一个指标.

我想有一个2 x 9数据框,其中包含MemberID,a.Y1,a.Y2,b.Y1,b.Y2,...

理想情况下,我想这样做spread或者cast因为我一直在使用这些工具,并希望了解更多关于如何使用它们.

Answer 1

运用 tidyr/dplyr

library(dplyr)
library(tidyr)
gather(mydf, Var, Val, a:d) %>% 
             unite(yearsVar, years, Var) %>%
             spread(yearsVar, Val)