R语言函数内引用数据框列变量报错，求正确引用方式

你的错误根源是df${{var}}属于无效语法，R不支持这种写法，因此触发了"unexpected '{' "的报错。下面提供两种实用的解决思路：

方法1：字符串传参（基础R写法） #

修改函数用[[索引数据框列，调用时传入变量名的字符串即可：

df <- data.frame(a = 1:3, b = 2:4)

f <- function(var) {
  m <- max(df[[var]])
  if (m == 3) {
    print("It's 3.")
  }
}

# 调用示例
f("a")  # 输出 "It's 3."
f("b")  # 无输出（b的最大值为4）

方法2：直接传变量名（无需引号） #

如果想保留f(a)这种调用方式，用base R的deparse(substitute())把传入的符号转为字符串即可：

df <- data.frame(a = 1:3, b = 2:4)

f <- function(var) {
  # 将传入的变量名转换为字符串
  var_name <- deparse(substitute(var))
  m <- max(df[[var_name]])
  if (m == 3) {
    print("It's 3.")
  }
}

# 直接传变量名调用
f(a)  # 输出 "It's 3."
f(b)  # 无输出

如果习惯使用tidyverse工具，也可以用rlang包的非标准求值语法实现：

library(rlang)
df <- data.frame(a = 1:3, b = 2:4)

f <- function(var) {
  var_sym <- enquo(var)
  m <- max(df %>% pull(!!var_sym))
  if (m == 3) {
    print("It's 3.")
  }
}

f(a)  # 正常输出结果

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