倒置R中的字符向量列表

Question

如下所示，反轉字符向量列表的有效方法是什麼？

輸入

lov <- list(v1=c("a", "b"), v2=c("a", "c"), v3=c("a")) 

預計

list(a=c("v1", "v2", "v3"), b=c("v1"), c=c("v2")) 

類似Revert list structure，但涉及的載體：

Answer 1

我們可以將list轉換爲data.frame（使用library(reshape2)stack或melt）和然後split'ind'列由'values'在'd1'中。

d1 <- stack(lov) 
split(as.character(d1$ind), d1$values) 

---

或者，如果上述的方法是緩慢的，我們可以複製（rep）由每個list元件的length「LOV」的names（lengths給出的各元素的length的vector輸出） 'lov'和split它由unlist。

split(rep(names(lov), lengths(lov)), unlist(lov))