如何摆脱 ggplot 图图例中的灰色填充（堆积条）答案

【问题标题】：How to get rid of a gray filling in a ggplot graph legend (stacked bar)如何摆脱 ggplot 图图例中的灰色填充（堆积条）
【发布时间】：2022-07-19 18:17:31
【问题描述】：

我在修复 ggplot 图表中的图例时遇到了麻烦。我想摆脱灰色填充，并用分配给变量的颜色填充一个正方形。

data = data.frame(Date = (seq(as.Date("2018-02-03"), as.Date("2019-05-05"), by = "days")),
                  var1 = runif(457),
                  var2 = runif(457)) %>%
    tidyr::pivot_longer(-Date, names_to = "variable", values_to = "value")

ggplot(data = data, 
           aes(x = Date, y = value, colour = variable)) + 
        geom_bar(stat = 'identity') + 
        theme_minimal() +
        scale_color_manual(values = c("#A90046", "#D1EAFE"), name = "")

【问题讨论】：

使用fill=variable 而不是colour=variable。您还需要更改为scale_manual_fill

标签： r ggplot2

【解决方案1】：

您可以像这样将审美更改为 fill 和 scale_fill_manual：

library(tidyr)
#> Warning: package 'tidyr' was built under R version 4.1.2
data = data.frame(Date = (seq(as.Date("2018-02-03"), as.Date("2019-05-05"), by = "days")),
                  var1 = runif(457),
                  var2 = runif(457)) %>%
  tidyr::pivot_longer(-Date, names_to = "variable", values_to = "value")

library(ggplot2)
#> Warning: package 'ggplot2' was built under R version 4.1.2
ggplot(data = data, 
       aes(x = Date, y = value, fill = variable)) + 
  geom_bar(stat = 'identity') + 
  theme_minimal() +
  scale_fill_manual(values = c("#A90046", "#D1EAFE"), name = "")

^{由reprex package (v2.0.1) 于 2022-07-19 创建}

【讨论】：