r - 我创建的返回 ggplot 对象的函数返回错误

Question

我创建了一个函数来返回如下所示的 ggplot 对象

uni_var<-function(df,col){
  return(ggplot(df,aes(col))+geom_bar())
}

当我调用 mtcars 数据框时

uni_var(mtcars,cyl)

我收到以下错误

Error in FUN(X[[i]], ...) : object 'cyl' not found
In addition: Warning message:
In FUN(X[[i]], ...) : restarting interrupted promise evaluation

我的函数有什么问题？

Answer 1

研究为什么需要 @claudiu-papasteri 的答案中举例说明的引号可能会很有用。在 R 中搜索非标准评估。另请参阅 https://rlang.r-lib.org/index.html .

尝试弄清楚为什么这个例子有效:

library(ggplot2)

uni_var<-function(df,col){
  col <- rlang::enquo(col)
  return(ggplot(df,aes(!!col))+geom_bar())
}

uni_var(mtcars, cyl)