在ggplot2中旋转图例

Question

I wish to rotate a ggplot2 legend 90°

From

qplot(mpg, wt, data=mtcars, colour=cyl)

生产

- Etienne Low-Décarie

Answer 1

类似于：

p <- qplot(mpg, wt, data=mtcars, colour=cyl)
p + scale_colour_continuous(guide = guide_legend(direction = "horizontal", title.position = "top",
                             label.position="bottom", label.hjust = 0.5, label.vjust = 0.5,
                             label.theme = element_text(angle = 90))) + 
      theme(legend.position = c(0.5, 0.9))

Ref: ggplot docs

- r.bot

---

你知道为什么使用 guide = guide_legend(... 似乎会将键从连续变为离散吗？ - user20650

那是因为传说是离散的 - 你需要使用“guide_colorbar”。 - Matt74

Answer 2

你可以尝试这个方法

library(ggplot2)
qplot(mpg, wt, data=mtcars, colour=cyl) + theme(legend.position = "top")

- Mamoun Benghezal

Answer 3

要完全正确，我认为您需要在guide_legend内使用label.theme和title.theme。 我认为使用title.position =“left”更好。

（复制以前解决方案的部分）

library(ggplot2)
qplot(mpg, wt, data=mtcars, colour=cyl) +
    scale_colour_continuous(guide = guide_legend(direction = "horizontal", title.position = "left", title.theme = element_text(angle = 90),
                             label.position="bottom", label.hjust = 0.5, label.vjust = 0.5,
                             label.theme = element_text(angle = 90))) + 
      theme(legend.position = c(0.5, 0.9))

- Perochkin