ggplot 直方图显示额外的灰色条

Question

所以我试图让这个直方图通过变量 compage 显示。我使用的代码是这样的：

hist.wrinko.age <- ggplot(ESSdata.oldage3, aes(wrinco2,fill=compage))
                        + theme(legend.position = "right")
                        + geom_bar(aes(y=..density..), binwidth=1, position="dodge")
                        + labs(x="WRINCO by age group", y = "Density")
                        + scale_x_continuous(breaks=seq(0, 10, 1)
                          )

它工作正常，但直方图看起来像这样：

基本上图例显示了 2 个变量，但直方图显示了 3 个。

我不知道第三条灰线来自哪里 - 我的代码有问题吗？

Answer 1

当有要绘制的数据（x 和 y 值）时添加灰色条，但 fill 变量是 NA。

从数据中省略 NA 的最简单方法是 na.omit 函数

ggplot(na.omit(ESSdata.oldage3), ...

ggplot 直方图显示额外的灰色条

ggplot histogram showing extra grey bar

r

histogram

ggplot2