r - 如何使用 R 中作为函数参数提供的变量名来命名图形的标题？

Question

我有一个函数，其唯一目标是生成条形图。我的数据集名为 south。

# ......................................................................................
# Data for my example 
south = matrix(data = sample(x = c("A","B","C"), size = 1032, replace = T), ncol = 12)
# ......................................................................................
# Function to graph the count of 'A', 'B', and 'C' from 'data'
graphMaker = function(system){
system %>%
  as.data.frame() %>%
  gather(key = "Key", value = "Values") %>% 
  ggplot(aes(Values, fill = Values)) +
  geom_bar() +
  labs(title = ________________)  
}
# ......................................................................................

How do I get my graph's title to be string I supplied to my function's argument system?

如果我尝试 labs(title = system)，我会得到一个标题为“C”的图表。

最终，这就是我希望图表的样子。

Answer 1

只需使用替换

labs(title = substitute(system))