如何在R中筛选含字符值的数据框：排除全为字符'0'的列

步骤1：构造示例数据框 #

先还原你给出的示例数据（确保所有值都是字符类型）：

df <- data.frame(
  x1 = rep("0", 5),
  x2 = c("0", "?", "0", "?", "0"),
  x3 = rep("1", 5),
  x4 = c("1", "0", "0", "1", "?"),
  x5 = c("1", "1", "1", "0", "1"),
  stringsAsFactors = FALSE
)

步骤2：筛选非全'0'的列 #

有两种简洁的实现方式：

方法一：用colSums快速判断

利用逻辑矩阵的列和筛选，只要列中存在非'0'元素，列和就大于0：

filtered_df <- df[, colSums(df != "0") > 0]

方法二：用sapply遍历列判断

逐列检查是否存在至少一个非'0'元素，逻辑更直观：

filtered_df <- df[, sapply(df, function(col) any(col != "0"))]

验证结果 #

运行上述代码后，filtered_df将只包含x2、x3、x4、x5列，完全符合需求。

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