リストからアイテムを抽出するR

Question

リストのリストがあります（技術的な名前はわかりません）。リストの各エレメントから最初のサブエレメントを抽出しますが、それを行う方法がわかりません。

たとえば、長さ2のリストがあり、各要素に2つのサブ要素があるとします。私は各要素の最初のサブ要素を抽出したいと思います。この例では

a = data.frame(name=c("A","B","C"),num=c(1,2,3)) 
b = data.frame(name=c("C","B","A"),num=c(3,2,1)) 

d = data.frame(name=c("D","E","F"),num=c(4,5,6)) 
e = data.frame(name=c("F","E","D"),num=c(6,5,4)) 

list = list(a,b) 
list2 = list(d,e) 
LoL = list(list,list2) 

、私はaとdを抽出したいです。私はLol[[]][[1]]を試しましたが、動作しません。

Answer 1

はlapply()自体がリストを返すことに注意してくださいlapply()

lapply(LoL, function(x) { x[[1]] }) 

# [[1]] 
# name num 
# 1 A 1 
# 2 B 2 
# 3 C 3 
# 
# [[2]] 
# name num 
# 1 D 4 
# 2 E 5 
# 3 F 6 

を試してみてください。

Answer 2

我々は

lapply(LoL, `[[`, 1)