消除列表列表中的重复项

Question

我有一个包含其他列表的列表，在每个列表中，我想根据第一列消除重复项。我设法只为列表中的一个列表做到这一点

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

但我无法将其应用于列表的所有列表。

例如，我有一个名称为“1”“2”“3”“4”的列表，每个列表都包含这种类型的列表

A EL1 E2L1
B EL2 E2L2
C EL3 E2L3
D EL4 E2L4
E EL5 E2L5
F EL6 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]), ])