如何在R语言中将字符串形式的逻辑表达式传入which函数？

方法1：使用eval(parse())直接执行字符串表达式 #

你可以通过parse()将字符串形式的逻辑表达式转换为可执行的R表达式，再用eval()执行它得到逻辑向量，之后就能正常用which()筛选：

# 定义字符串形式的筛选条件
logical_var = paste0("input_dataset$", "height >= 1.60")
# 转换并执行表达式得到逻辑向量
logical_vec <- eval(parse(text = logical_var))
# 筛选子集
subset_data <- input_dataset[which(logical_vec), ]

如果不想把数据集名称硬编码到字符串里，还可以指定执行环境，灵活性更高：

# 只定义条件部分，无需写数据集名
condition_str <- "height >= 1.60"
# 指定在input_dataset的环境中执行表达式
logical_vec <- eval(parse(text = condition_str), envir = input_dataset)
subset_data <- input_dataset[which(logical_vec), ]

方法2：结合subset()函数简化代码 #

直接把转换后的表达式传给subset()函数，写法更简洁：

condition_str <- "height >= 1.60"
subset_data <- subset(input_dataset, eval(parse(text = condition_str)))

方法3：tidyverse风格的安全实现（推荐） #

如果用tidyverse工具链，推荐用rlang包的表达式解析工具，比parse()更安全可控：

library(rlang)
library(dplyr)

condition_str <- "height >= 1.60"
# 将字符串转为表达式
cond_expr <- parse_expr(condition_str)
# 使用filter筛选
subset_data <- filter(input_dataset, !!cond_expr)

注意事项 #

• parse()会执行字符串中的任意代码，如果你的字符串来自不可信的外部输入，存在安全风险，此时优先用方法3的rlang工具，或者手动校验条件字符串。
• 注意变量名拼写，你示例里的heigth是拼写错误，实际要写成height避免报错。

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