R语言行列筛选问题：提取含字符M的列名及行数据

首先先构造你提供的示例数据框：

df <- data.frame(
  nr = 1:4,
  c0 = c("A", "Z", "N", "M"),
  c1 = c("B", "U", "K", "L"),
  c2 = c("M", "C", "N", "Y"),
  c3 = c("Z", "M", "D", "E"),
  stringsAsFactors = FALSE
)

需求1：找出所有包含"M"的列并存储 #

通过sapply遍历每一列，判断是否存在"M"，提取对应的列名后转为数据框：

# 筛选包含"M"的列名
cols_with_M <- colnames(df)[sapply(df, function(col) any(col == "M"))]
# 转为指定格式的数据框
result_cols <- data.frame(c_names = cols_with_M)

运行后得到的结果：

需求2：筛选所有包含"M"的行数据 #

通过rowSums计算每行中"M"出现的次数，保留次数大于0的行：

# 筛选至少包含一个"M"的行
result_rows <- df[rowSums(df == "M") > 0, ]

运行后得到的结果：

内容的提问来源于stack exchange，提问作者Horst-Jackson