r - ネストされたリストの正確に 2 つの次元を平坦化する方法は?

Question

次のように作成されたリストがあるとaします。

a1<-list(1,2,list("X",10))
a2<-list("A",list("B"),"C")
a3<-list(list("D",list("E")),3.14)
a<-list(a1,a2,a3)

どうすればaこれに変換できますか:

list(1,2,list("X",10),"A",list("B"),"C",list("D",list("E")),3.14)

上記の例のようにa1, a2, a3... anだけでなく、a1, a2任意の数の に対して機能するソリューションが必要です。a3

Mathematica では単純に を使用Flatten[a,1]しますが、R ではどのように行うのでしょうか?

Answer 1

unlistで使用recursive=FALSE:

dput(unlist(a,recursive=FALSE))
list(1, 2, list("X", 10), "A", list("B"), "C", list("D", list(
    "E")), 3.14)

Answer 2

それは簡単です：

Reduce("c",a)

それで全部です。