r - 更改图例名称而不更改 ggplot2 中的颜色

Question

我想在不改变已经设置的自定义颜色的情况下重命名图例中的值。有没有办法在不使用 scale_color_manual 的情况下设置图例标签？目前，我有这样的事情：

norm <- rnorm(1000, 0 , .5)
gam <- rgamma(1000, 2)
beta <- rbeta(1000, 2, 3)
dist <- data.frame(Normal = norm, Gamma = gam, Beta= beta)
dat <- melt(dist, variable.name = "Distribution", value.name = "XValue")
plot1 <- ggplot(dat, aes(XValue, color = Distribution)) +
            stat_density(geom = "path", position = "identity", size = 2) +
            scale_color_manual(values = c("yellow", "black", "forestgreen"))

plot2 <- plot1 + scale_color_discrete(labels = c("Distribution 1",
                                "Distribution 2",
                            "Distribution 3"))

但是，这会覆盖手动颜色。我将在与我设置颜色的位置不同的函数中更改名称，因此很遗憾，我将无法使用 scale_color_manual(values =... , labels = ...)。我想到的另一个选择是以某种方式获取 plot1 中使用的颜色。然后我可以做类似的事情：

colors <- plot1$colors_used
plot2 <- plot1 + scale_color_manual(labels = c("Distribution 1", 
                                               "Distribution 2",
                        "Distribution 3"),
                                      values = colors)

任何帮助将非常感激。谢谢！

Answer 1

可以在 中指定标签名称scale_colour_manual。

ggplot(dat, aes(XValue, color = Distribution)) +
  stat_density(geom = "path", position = "identity", size = 2) +
  scale_color_manual(values = c("yellow", "black", "forestgreen"),
                     labels = c("Distribution 1",
                                "Distribution 2",
                                "Distribution 3"))

Answer 2

如果您愿意使用一致的调色板，那么您可以将其定义为：

    mycolors <- c("red", "blue", "black", #ee4747, #fff382, #f1f6c8, #334d65, #263825)

现在，而不是

    values = c("yellow", "black", "forestgreen")

采用

    values = mycolors