在 R 中检索拆分列表的 ID

Question

假设我有一个列表，如下所示:

my.list <- list()

for (i in 1:100)
  {
  my.list[[i]] <- list(location = sample(paste0("Location", 1:5), 1, replace=T),
                       val1 = runif(100),
                       val2 = runif(30))
  }

现在我按位置拆分

loc <- sapply(my.list, function(x){x$location})
my.list.split <- split(my.list, loc)

有没有办法将 my.list.split 的每个元素与原始 my.list 关联起来，即在 my.list 中找到它的 ID ?

Answer 1

这是查找 ID 的一种方法:

IDs <- seq_along(my.list) # generate a vector of IDs

IDs.split <- split(IDs, loc) # split the IDs along loc

这会返回一个列表，其中包含每个 location 的 ID 向量。