无法更改 ggplot 箱线图图例名称

Question

我正在使用此代码：

 library(ggplot2)
 library(reshape)
 mtcars <- melt(mtcars, id="am")
 mtcars$am <- as.character(mtcars$am)
 p <- ggplot(mtcars, aes(x = variable, y = value)) + 
    geom_boxplot(aes(color = am), width = 0.4, size = 0.4, position = position_dodge(0.6), 
        outlier.shape=NA, notch=T) +
    scale_color_manual(values = c("red", "blue")) + 
    guides(fill = guide_legend(reverse=TRUE)) + 
    scale_fill_discrete(name="No name", labels=c("A", "B")) + #Why does this line not work?
    coord_flip()
 p

为什么图例名称和变量名称不变？我该如何更改它们？

Answer 1

这能解决您的问题吗？

library(ggplot2)
library(reshape)
mtcars <- melt(mtcars, id="am")
mtcars$am <- as.character(mtcars$am)
p <- ggplot(mtcars, aes(x = variable, y = value)) + 
  geom_boxplot(aes(color = am), width = 0.4, size = 0.4, position = position_dodge(0.6), 
               outlier.shape=NA, notch=T) +
  scale_color_manual(values = c("red", "blue"),
                     name="No name", labels=c("A", "B")) + 
  guides(fill = guide_legend(reverse=TRUE)) + 
  coord_flip()
p

问题是你没有在图中使用“填充”（你使用“颜色”），所以调整“填充”比例没有任何效果。

另外，将guides(fill = guide_legend(reverse=TRUE)) 更改为guides(color = guide_legend(reverse=TRUE)) 以反转图例顺序。