对齐图例水平ggplot2

Question

我想知道在ggplot2和ggnewscale:中是否存在水平而不是垂直叠加传奇的方法。

使用mtcar数据集的示例：

ggplot(mtcars, aes(x = mpg, y = cyl)) +
  geom_point(aes(col = gear)) +
  ggnewscale::new_scale_color() +
  geom_point(aes(col = carb))

例如，地块

​

​

Answer 1

您可以通过guides(...):单独控制传说。

library(ggnewscale)

ggplot(mtcars, aes(x = mpg, y = cyl)) +
  geom_point(aes(col = gear)) +
  ggnewscale::new_scale_color() +
  geom_point(aes(col = carb))+
  theme(legend.direction = "vertical",
      legend.box = "horizontal",
      legend.position = "right") +
  guides(size=guide_legend(direction='horizontal'))

​

​