删除 R 中具有唯一长度的列

Remove column with unique length in R

我有这个数据框(火车),其中有 2314 个变量,我想删除列的唯一长度 < 2 的列,并保留长度 > 1 的列。也许我可以申请扩展到我的功能,然后 运行 它!

示例:

length(unique(train$makeAcura))
[1] 2

并删除长度 < 2 的列

length(unique(train$makeAm.General))
[1] 1

您可以使用 Filter 来保留唯一长度大于 1 的列。

Filter(\(x) length(unique(x)) > 1, train)
#  a c
#1 1 1
#2 2 2
#3 3 1

数据:

train <- data.frame(a=1:3, b=1, c=c(1,2,1))