ggplotの世界は深い。 var.name <- paste("hogehoge", "hugahuga", sep = "") dat %>% ggplot(aes(var.name)) + geom_point() # error dat %>% ggplot(aes_string(var.name)) + geom_point() # OK