ggplot处理带引号的变量

Question

在完成对数据框的操作后，生成ggplot()图时出现意外问题。我提供一个说明性的例子：由于var.name引述

func <- function(){ 
library(ggplot2) 
df <- read.table(....) 
# perform operation on df to retrieve column of interest index/number 
column.index <- regexpr(...) 
# now need to find variable name for this column 
var.name <- names(df)[column.index] 
# also need to mutate data in this column 
df[,column.index] <- df[,column.index] * 10 
# generate plot 
plot <- ggplot(data, aes(x=var.name))+geom_bar() 
print(plot) 
} 

这里ggplot将抛出一个错误，例如，“省油”。 任何想法如何解决这个问题？

编辑：从this question测试解决方案无济于事。

Answer 1

使用aes_string，它允许你传递一个字符串变量的名称。

Answer 2

您可以使用包“dplyr”重新命名var.name列的东西通用的（X），然后在X情节：

# also need to mutate data in this column 
df[,column.index] <- df[,column.index] * 10 
# ***NEW*** re-name column to generic name 
df <- rename_(df, .dots=setNames(list(var.name), 'x')) 
# generate plot 
plot <- ggplot(df, aes(x=x))+geom_bar()