检查DataFrame列类型结果错误，如何判断列是否为factor或二进制？

错误原因 #

你在循环里用df$col是错误的——$符号会把col当成字面列名去查找，而不是用循环变量col的当前取值（比如第一次循环的"num"、第二次的"fac"）。因为你的DataFrame里根本没有叫"col"的列，所以每次都返回FALSE。

正确的检查方式 #

1. 修正循环写法 #

把df$col换成df[[col]]或者df[, col]，这两种方式会解析循环变量的实际值：

cols <- colnames(df)    
for (col in cols) {
  print(col)
  print(is.factor(df[[col]]))
}

运行后会得到正确结果：

[1] "num"
[1] FALSE
[1] "fac"
[1] TRUE

2. 更高效的批量检查（无需循环） #

直接用sapply()函数批量遍历DataFrame的列，一次性获取所有列的类型判断结果，比循环更简洁：

# 检查所有列是否为factor类型
sapply(df, is.factor)
# 输出：
#   num   fac 
# FALSE  TRUE 

检查二进制类型 #

如果要判断列是否是二进制类型（即仅包含两个不同取值），可以自定义一个简单函数，再结合sapply()批量检查：

# 定义二进制判断函数（自动忽略NA值）
is_binary <- function(x) {
  length(unique(na.omit(x))) == 2
}

# 批量检查所有列
sapply(df, is_binary)

比如如果某列取值是c(0,1,0,1)或c("yes","no","yes")，这个函数都会返回TRUE。

内容的提问来源于stack exchange，提问作者Nemo