我有ggplot
如下两个对象。
library(ggplot2)
set.seed(1)
dat1 = data.frame(x = rnorm(1000), y = rnorm(1000))
dat2 = data.frame(x = rt(5000, 2))
Plot1 = ggplot(data = dat1, aes(x = x, y = y)) + geom_point()
Plot2 = ggplot(dat2) + geom_histogram(aes(x = x))
现在我想在 的左中部分Plot2
叠加。所需的输出Plot1
Plot1
为了获得更好的可见性,我还希望具有一定的透明度,Plot2
以便Plot1
在重叠区域不会完全被掩盖。
有什么方法可以实现吗?我在网上搜索了相关信息,但似乎都提到了添加图层。我的最终绘图结果与单纯添加图层的结果不同。