我有以下结构的数据框:
pat <- c(rep(1,50), rep(2,50), rep(3,50))
inc <- rep(c(rep(1,5), rep(2,5), rep(3,5), rep(4,5), rep(5,5),
rep(6,5), rep(7,5), rep(8,5), rep(9,5), rep(10,5)), 3)
df <- data.frame(cbind(pat, inc))
df分为一系列元素:
all.inc = split(df, inc)
现在我想将此列表的每个元素拆分为子列表.就像是:
all.pat = split(all.inc, pat)
显然,这不起作用.我已经尝试过这些plyr功能lapply,但是没有让它发挥作用.
有任何想法吗？