计算R中列表中所有数据帧中列的唯一值

时间:2018-04-10 13:24:24

标签: r unique lapply

我有两个数据框的列表。每个数据帧都有一个var1和一个var2。我试图计算所有数据帧中var1的唯一观测值。我能够为每个单独的数据框执行此操作。

数据框1:

var1 <- c(1, 1, 2, 3, 4, 5, 5)
var2 <- c(1, 2, 3, 4, 5, 6, 7)
df1 <- data.frame(var1, var2)
df1_count <- length(unique(df1$var1))

df1_count给出5的正确答案。

数据框2:

var1 <- c(1, 2, 3, 4, 4, 4, 4)
var2 <- c(1, 2, 3, 4, 5, 6, 7)
df2 <- data.frame(var1, var2)
df2_count <- length(unique(df2$var1))

df2_count给出4的正确答案。

但是当df1和df2在列表中时我该怎么做?

my_list<-list(df1, df2)

我认为它会如下:

my_list_count <- lapply(my_list, length(unique(my_list$var1)))

不幸的是,这不起作用。有什么建议? 非常感谢你的帮助!

0 个答案:

没有答案