R语言如何统计矩阵中满足指定数值条件的列数

rowSums()无法得到正确结果的核心原因是函数维度不匹配：rowSums()用于按行计算总和，你的需求是按列做存在性判断，属于维度选择错误，以下是两种可直接运行的实现方案：

• 高效向量化实现（推荐，适配5000行规模矩阵无性能压力）
  核心逻辑是先做逐元素布尔判断，生成和原矩阵维度一致的布尔矩阵，再统计每列符合条件的元素个数，只要列内符合条件的元素数大于0，就记为符合要求的列：

  # 将mat替换为你实际的矩阵变量名
  # 统计存在至少一个值<=10的列总数
  col_count <- sum(colSums(mat <= 10) > 0)
  

  该写法可直接扩展为通用场景：统计存在值大于等于指定阈值的列数，只需修改判断条件即可，例如阈值设为30时，判断条件写为mat >= 30。

• 自定义逻辑实现（适配复杂判断场景）
  如果后续需要叠加多重复合判断规则，可以使用apply()按列遍历判断，逻辑更直观易修改：

  # apply第二个参数为2代表按列遍历，为1代表按行遍历
  col_count <- sum(apply(mat, 2, function(current_col) any(current_col <= 10)))
  

  代码中any()函数会判断当前列是否存在至少一个符合条件的元素，返回TRUE/FALSE，最终sum()会将布尔值自动转为1/0求和，得到符合要求的列总数。

扩展提示：如果需要反向统计「所有值都不满足条件」的列数，只需把第一种方法判断条件中的>0改为==0，或者把第二种方法的any()替换为对应否定判断即可。

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