传说中的ggplot2，删除级别

Question

我的数据：

df <- data.frame(sp = c(LETTERS[1:8]),
                 tr = c("NS", "LS", "NS", "LS", "LS", "HS", "HS", "HS"),
                 bv = c(14, 5, 11, 5.6, 21, 5.4, 2, 4.8),
                 av = c(0.0, 14, 21, 48.4, 15, 55.6, 37, 66.2))

我做条形图

library(reshape2)
df1 <- melt(df, id.vars = c("sp", "tr"))

ggplot(aes(sp, value, fill = variable) , data = df1) + theme_classic() + 
  geom_bar(aes(lty = tr), lwd = 1.2, data = df1, stat = "identity", colour = "black", width =.8) + 
  theme(legend.position = "bottom" ) +
  scale_linetype_discrete(name = "ja") 

输出   我不喜欢的是传说。我想从第二部分＆＃34; ja＆＃34;中选择线条类型。并删除＆＃34; variable＆＃34;部分。我希望在图例框中有白色背景，而不是灰色背景。

Answer 1

您可以通过在variable中设置fill = FALSE来移除guides图例，并在override.aes中使用guide_legend更改背景颜色（也在{{1}内） }）如下：

guides

这导致以下情节：