いくつかのリストといくつかのリストを結合するより読みやすい方法がRapplyによって返されました。

Question

4つのリストのリストを作成したいとします。最初の2つは手動で定義され、2つ目はlapplyの結果です。だから、具体的には、私は、これらの3つの項目があります。

> list("a" = 1) 
> list("b" = 1) 
> lapply(1:2,FUN=function(i) { list("c"=i) } 

をそして私は、出力リストがあるように、それらを結合したい：私は次のように使用してそれを達成することができます

[[1]] 
[[1]]$a 
[1] 1 


[[2]] 
[[2]]$b 
[1] 1 


[[3]] 
[[3]]$c 
[1] 1 


[[4]] 
[[4]]$c 
[1] 2 

：

> unlist(recursive=FALSE, 
     list(
       list(list("a"=1),list("b"=1)), 
       lapply(1:2,FUN = function(i) { list("c"=i) }) 
      ) 
     ) 

しかし、このリストのビジネスリストは少し冗長であるようです。私はもちろん、これを行うための関数を書くことができることは知っていますが、よりクリーンなライナーがあるかどうか疑問です。あなたはそれに反対している場合は、「リストの事業のリストのリストが少し冗長なようだ」

Answer 1

c(list(list("a" = 1),list("b" = 1)),lapply(1:2,FUN=function(i) { list("c"=i) })) 

Answer 2

、あなたはリストの出力が詳細である、またはリストのコードが冗長であることを不満を抱いていますか？

どの部分がアトミックリストになり、どの部分がリストとして残る必要がありますか？これらのいずれかがあなたの懸念に対処していますか？

c(
    rep("a", 1), 
    rep("b", 1), 
    rep("c", 2) 
) 

rep(
    c("a", "b", "c"), 
    c(1 , 1 , 2) 
) 

どちら

は、アトミック文字ベクトル生成：

[1] "a" "b" "c" "c"