R语言：条件显示文本时如何将代码段移出字符串并被程序识别

你的代码存在两个关键问题：

• 括号匹配错误：nrow( subset(df,column == 1) != 0) 中，!= 0 应该放在 nrow() 外面，否则会先判断子集数据框是否不等于0（逻辑不成立），再把布尔值传给nrow()。
• 字符串内的代码不会执行：直接把nrow(subset(df, column == 1))写在引号里，程序会把它当成普通文本输出，而非执行计算。

修正后的高效写法 #

`r 
# 先计算目标行数，避免重复执行子集操作
target_count <- nrow(subset(df, column == 1))
# 条件判断后拼接文本与计算结果
if(target_count != 0) {
  paste("多选变量存在", target_count, "个缺失值。")
}
`

简化写法（适合短场景） #

`r if(nrow(subset(df, column == 1)) != 0) {
  paste("多选变量存在", nrow(subset(df, column == 1)), "个缺失值。")
}`

核心说明 #

1. 修正括号位置：nrow(subset(df, column == 1)) != 0 先计算符合条件的子集行数，再判断是否大于0，逻辑更合理。
2. 用paste()拼接内容：程序会执行nrow(subset(df, column == 1))得到具体数值，再和静态文本组合成完整句子输出，不会把代码片段当成文本显示。

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