R：ベクトルとスカラーを含むマージリスト

Question

私はNのリストにいくつかの同じ列名を持っています。ここでは、2つのリストとMWEです：

ls <- list() 
ls[[1]] <- list("a"=1:2, 
       "b"=20, 
       "c"=numeric(0)) 
names(ls[[1]]$a) <- c("a1", "a2") 

ls[[2]] <- list("a"=3:4, 
       "b"=30, 
       "c"=1:4, 
       "d"="f") 
names(ls[[2]]$a) <- c("a1", "a2") 

はそれがlsResは、以下の特性を有する結果リストlsRes、にこれらを可能マージです：

1. lsRes$aは、最初に名前が付いている2つの要素を含み、 （名前Cと（A1は、A2））ベクター C（1,2）及び第二の名前ベクトルc（3,4） （名前を持つ（C（a1.a2）））
lsRes$b

2. は、2つを含んでいます最初の要素は20aです最初のNAである 2つの要素を含み、そして第二が "4

3. lsRes$d：ND第30

4. lsRes$c最初の数値である2つの要素を含み、（0）と第二は1でありますF」

を私はthisとthisを見て、彼らは

Answer 1

たちはlistとしても出力を持っている必要がありますと仮定すると、別の例を説明し、我々共通namesを作成し、NA

nm1 <- unique(unlist(sapply(ls, names))) 
lsRes <- lapply(ls, function(x) {x[setdiff(nm1, names(x))] <- NA; x}) 
lengths(lsRes) 
#[1] 4 4 

にそれらが共通の名前のいずれかを割り当てない私たちはlist 4の要素を持っている必要がある場合は、transpose

library(purrr) 
lsRes %>% 
     transpose