7

このベクトルのリストを要素名で組み合わせるには?

L1 <- list(F01=c(1,2,3,4),F02=c(10,20,30),F01=c(5,6,7,8,9),F02=c(40,50))

取得するには:

results <- list(F01=c(1,2,3,4,5,6,7,8),F02=c(10,20,30,40,50))

次のソリューションマージ リストを要素名で適用しようとしましたが、これを自分の状況に適応させる方法がわかりません。

4

2 に答える 2

8
sapply(unique(names(L1)), function(x) unname(unlist(L1[names(L1)==x])), simplify=FALSE)
$F01
[1] 1 2 3 4 5 6 7 8 9

$F02
[1] 10 20 30 40 50
于 2013-09-12T15:00:30.823 に答える