r - 填充和scale_fill_discrete/plot图例之间的ggplot冲突

Question

我正在修改 geom_point 试图绘制以下代码。我已将 cars$vs 转换为具有离散级别的因子，以便我可以通过将其分配给 ggplot aes 设置中的“填充”来以不同颜色可视化该变量的两个级别。

cars <- mtcars
cars$vs <- as.factor(cars$vs)

ggplot(cars,aes(x = mpg, y = disp, fill = vs)) +
  geom_point(size = 4) +
  scale_fill_discrete(name = "Test")

如您所见，该图没有通过颜色区分两种“填充”条件。但是，它保留了我在 scale_fill_discrete 中指定的图例标签。

或者，我可以绘制以下内容(相同的代码，但不是“填充”，而是使用“颜色”)

cars <- mtcars
cars$vs <- as.factor(cars$vs)

ggplot(cars,aes(x = mpg, y = disp, color = vs)) +
  geom_point(size = 4) +
  scale_fill_discrete(name = "Test")

如您所见，使用“颜色”而不是“填充”通过颜色区分因子的级别，但似乎覆盖了我使用 scale_fill_discrete 对图例标题所做的任何更改。

我是否错误地使用了“填充”？如何使用此方法以不同颜色绘制不同级别的因子，并通过 scale_fill_discrete 控制绘图图例？

Answer 1

由于您使用的是 color作为映射，您可以使用 scale_color_*更改相应的属性而不是 scale_fill_* :

ggplot(cars,aes(x = mpg, y = disp, color = vs)) +
      geom_point(size = 4) +
      scale_color_discrete(name = "Test")