ggplot，基于变量的geom_point颜色

Question

我正在寻找一种基于变量“var_color”为绘图点着色的方法。 这是一个示例代码：

library(tidyverse)
data1 <- data %>% 
  group_by(clusterNum, Road, period) %>% 
  count() 

ggplot(data1, aes(x=period, y=n, group=clusterNum)) +
  geom_bar(aes(fill = Road),
           position = "dodge",
           stat = "identity")

有谁知道我该怎么做？ 问候

Answer 1

这是一种方法。使用 get 获取变量 var_color 的值。然后更改图例标题。

library(ggplot2)

var_color <- "manufacturer"

ggplot(mpg, mapping = aes(x = displ, y = hwy, color = get(var_color))) +
  geom_point() +
  guides(color = guide_legend(title = var_color))