在R中的函数中使用它时出现ggplot（）错误[重复]

Question

我需要关于我第一次使用的 ggplot() 的帮助。 我有一个函数定义如下：

myHist <- function(data, varName = "") {
gp <- ggplot(data, aes(data[, varName]))
gp <- gp + geom_histogram(alpha = 1, aes(fill=..count..))
gp <- gp + labs(title = paste("Histogram for ", varName, sep = " "))
gp <- gp + labs(x = varName, y = "N") 
gp <- gp + scale_fill_gradient("", low = "blue", high = "red")
gp

}

然后按如下方式使用它：

myHist(data = iris, varName = "Petal.Width")

这给出了以下错误：

"Error in eval(expr, envir, enclos) : object 'varName' not found"

谁能帮忙？在调试时，如果我初始化传递给函数内部的参数，则可以正常工作。但是函数本身不起作用

Answer 1

您需要使用aes_string，因为您的变量是存储为字符值的函数的输入值。

myHist <- function(data, varName = "") {
  gp <- ggplot(data=data, aes_string(varName))
  gp <- gp + geom_histogram(alpha = 1, aes(fill=..count..))
  gp <- gp + labs(title = paste("Histogram for", varName, sep = " "))
  gp <- gp + labs(x = varName, y = "N") 
  gp <- gp + scale_fill_gradient("", low = "blue", high = "red")
  gp}