リストの複雑なリストをデータフレームのリストに変換する

Question

他のリストとデータフレームで構成される複雑なリストがあります。私は、このリストをデータフレームからのみ構成するように簡素化する必要があります。そのため、各第2レベルのリストを別々の第1レベルのデータフレームにする必要があります。ここで

が再現可能な例である：私は

l2<-list(dd,dd,dd) 
l2 
[[1]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

[[2]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

[[3]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

を取得する必要があります

dd<-data.frame(x=1:3,y=4:6) 
l1<-list(dd,list(dd,dd)) 
#original list 
l1 
[[1]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

[[2]] 
[[2]][[1]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

[[2]][[2]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

結果、私は機能unlist()と引数recursive=FALSEで試してみましたが、この場合には最初のレベルのデータフレームは、二つのベクトルに変換され、 。私は考えることができ

unlist(l1,recursive=FALSE) 
$x 
[1] 1 2 3 

$y 
[1] 4 5 6 

[[3]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

[[4]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

Answer 1

一つの方法は、（lapplyの実行中）入力のクラスはdata.frameまたはlistあり、そしてそれはdata.frameだ場合data.frameのリストに変換かどうかを確認することです。これにより、リスト全体がdata.framesのリストになります。あなたは正確に言及すると、データがあるとき、これは当然のことながら作品

unlist(lapply(l1, function(x) 
     if (class(x) == "data.frame") list(x) else x), recursive=FALSE) 
[[1]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

[[2]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

[[3]] 
    x y 
1 1 4 
2 2 5 
3 3 6 

次のようにその後、recursive=FALSEでunlistを使用することができます。それらはdata.framesのリストかdata.framesのリストのリストのいずれかです。ああ、SO（最初の質問）へようこそ！ :)