如何更改ggplot2中的图例？

Question

我用虹膜数据集做练习。 我几乎做我想做的事，但传说出现了两次。

是否可以“翻译”传说？ 如果我尝试使用： scale_color_discrete 看到下面的结果。

library(ggplot2)
library(ggdark)
ggplot(data=iris, aes(x = Sepal.Length, y = Sepal.Width )) +
  geom_point(aes(color=Species, shape=Species)) +
  xlab("Longueur des sépales") + 
  ylab("Largeur des sépales") +
  ggtitle("Largeur et longueur des sépales") +
    scale_color_discrete(name = "Espèces") +
    dark_theme_gray() +
   theme(plot.title = element_text(family = "Roboto"),
        plot.background = element_rect(fill = "grey10"),
        panel.background = element_blank(),
        panel.grid.major = element_line(color = "grey30", size = 0.2),
        panel.grid.minor = element_line(color = "grey30", size = 0.5),
        legend.background = element_blank(),
        axis.ticks = element_blank(),
        legend.key = element_blank(),
        legend.position = c(0.815, 0.85))

结果：

如果我尝试使用标签：

library(ggplot2)
library(ggdark)
ggplot(data=iris, aes(x = Sepal.Length, y = Sepal.Width )) +
  geom_point(aes(color=Species, shape=Species)) +
  labs(title = "Largeurs et longueurs des sépales par espèce",
        caption = "Jeu de donnée iris",
         x = "Longueur des sépales",
         y = "Largeur des sépales",
         colour = "Espèces"
     ) +
   theme(
     plot.title = element_text(family = "Roboto"),
        plot.background = element_rect(fill = "grey10"),
        panel.grid.major = element_line(color = "grey30", size = 0.2),
        panel.grid.minor = element_line(color = "grey30", size = 0.5),
        legend.background = element_blank(),
        axis.ticks = element_blank() 
     ) +
    dark_theme_gray()

有一点我不明白。 谢谢 。

Answer 1

添加scale_shape_discrete(name = "Espèces")就可以了。

ggplot(data=iris, aes(x = Sepal.Length, y = Sepal.Width,color=Species, shape=Species )) +
  geom_point(aes()) +
  xlab("Longueur des sépales") + 
  ylab("Largeur des sépales") +
  ggtitle("Largeur et longueur des sépales") +
  scale_color_discrete(name = "Espèces") +
  scale_shape_discrete(name = "Espèces") +
  dark_theme_gray()