通过变量设置ggplot主题

Question

如何使用变量更改主题？

library(ggplot2)
ggplot(iris,aes(Sepal.Length,Petal.Width))+
  geom_point()

我能做到

ggplot(iris,aes(Sepal.Length,Petal.Width))+
  geom_point()+
  theme_bw()

相反，如果我的主题是在变量中定义的，

var1 <- "theme_bw"
var2 <- "theme_grey"

我可以用它来设置主题吗？

Answer 1

ggplot() + get("theme_bw")()

在上面发布baptiste的答案，因为我不想让这个问题无法回答。

Answer 2

Theme <– "theme_bw()"    
eval(parse(text=as.character(Theme)))

这是另一种实现方法，因为使用get时出现错误。