消除列表中的重複項

Question

我有一個列表包含其他列表，並在每個列表中我想根據第一列消除重複項。我設法做到這一點只是爲列表中的一個列表

x<-as.data.frame(list[1]) 
test <-x[!duplicated(x[,1]), ] 

但我有麻煩將此應用於列表中的所有列表。

例如，我有名稱 「1」 「2」 「3」 「4」 列表的列表，每片含這種類型

甲EL1 E2L1
乙EL2 E2L2
℃的列表EL3 E2L3
d EL4 E2L4
ËEL5 E2L5
˚FEL6 E2L6
一個EL7 E2L7

，並從每個列表我想消除每一個重複的行。

在此先感謝

Answer 1

這可能會實現：

讓我們產生了一些樣本數據：

list = lapply(1:3, function(x)lapply(1:2, sample, size=5, x=1:5)) 

然後用lapply：

lapply(list, function(x)as.data.frame(x)[!duplicated(as.data.frame(x)[,1]), ])