R:将列表元素拆分为子列表 [英] R: split elements of a list into sublists

问题描述

我有一个具有以下结构的数据框:

I have a data frame with following structure:

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)

现在，我想将此列表的每个元素拆分为子列表.像这样:

Now I want to split each element of this list into sub-lists. Something like:

all.pat = split(all.inc, pat)

这显然行不通.我已经尝试过plyr函数和lapply，但是没有使它起作用.

This doesn't work, obviously. I've already tried the plyr functions and lapply, but didn't get it to work.

有什么想法吗?

推荐答案

使用lapply:

lapply(all.inc, function(x) split(x, x$pat))

这篇关于R:将列表元素拆分为子列表的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！