r - 将多个 ggplots 合并为一个具有共享梯度图例的图

Question

我有多个 ggplots，目前它们有不同的渐变图例。我想使用 grid extra 包来创建一个包含所有图的图，例如 为组合 ggplots 添加一个公共图例

但是，该解决方案适用于分组的离散数据。有没有办法让它适用于我的渐变图例。

标签： rggplot2

Answer 1

如果没有更多信息（例如当前代码和dput输出），很难回答您的问题。

但是，仅根据您的讲话，{patchwork}包（链接）似乎最适合这种操作。

例如，你可以这样写：

library(tidyverse)
library(patchwork)

p1 <- ggplot(mtcars) + geom_point(aes(mpg, disp, color=hp))
p2 <- ggplot(mtcars) + geom_point(aes(drat, wt, color=hp))

p1 + p2

p1 + p2 + plot_layout(guides = 'collect')