Question

示例：

xy <- data.frame(x=1:10, y=10:1, type = rep(LETTERS[1:2], each=5))

plot <- ggplot(data = xy)+
  geom_point(aes(x = x, y = y, color=type)) +
  theme(legend.position = 'bottom')

plot

我们怎样才能获得标题＆＃39;输入＆＃39;在A和B之上，而不是他们的左边？

由于

Answer 1

您可以使用指南（）并指定标题位置来消除您的问题。

library(ggplot2)
xy <- data.frame(x=1:10, y=10:1, type = rep(LETTERS[1:2], each=5))

plot <- ggplot(data = xy)+ geom_point(aes(x = x, y = y, color=type)) +
        theme(legend.position = 'bottom') + 
        guides(colour = guide_legend(title.position = "top"))

plot

虽然这是旧的，但我注意到了这个答案 Legend title position in ggplot2还不错，即使ggplot2现在有很多0.9以上的版本。我注意到不再需要调用库（scale）了。希望这有帮助

当图例位置例如是底部时，如何将图例标题放在标签的顶部？

1 个答案: