删除 R 中的常量列

Question

收到此错误时我正在使用 prcomp 函数

Error in prcomp.default(x, ...) : 
cannot rescale a constant/zero column to unit variance

我知道我可以手动扫描数据，但是 R 中是否有任何函数或命令可以帮助我删除这些常量变量？我知道这是一个非常简单的任务，但我从未遇到过任何执行此操作的函数。

谢谢

Answer 1

这里的问题是您的列方差等于零。您可以通过这种方式检查数据框的哪一列是不变的，例如:

df <- data.frame(x=1:5, y=rep(1,5))
df
#   x y
# 1 1 1
# 2 2 1
# 3 3 1
# 4 4 1
# 5 5 1

# Supply names of columns that have 0 variance
names(df[, sapply(df, function(v) var(v, na.rm=TRUE)==0)])
# [1] "y" 

因此，如果您想排除这些列，可以使用:

df[,sapply(df, function(v) var(v, na.rm=TRUE)!=0)]

编辑:事实上，使用 apply 更简单。像这样的事情:

df[,apply(df, 2, var, na.rm=TRUE) != 0]