消除列表列表中的重复项

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
A 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]), ])