R 几何密度y轴的长度

R 几何密度y轴的长度,r,ggplot2,R,Ggplot2,我的代码与下面的示例非常相似。我有类别(内部存储为因子),我需要绘制多个图表。 当我绘制它们时,y轴的tich与图中所示的高度不完全相同。有解决方案吗 library(ggplot2) library('grid') a=ggplot(iris, aes(x = Sepal.Length, y = Species)) + geom_density_ridges() b=ggplot(iris, aes(x = Sepal.Width, y = Species)) + geom_density_r

我的代码与下面的示例非常相似。我有类别(内部存储为因子),我需要绘制多个图表。 当我绘制它们时,y轴的tich与图中所示的高度不完全相同。有解决方案吗

library(ggplot2)
library('grid')
a=ggplot(iris, aes(x = Sepal.Length, y = Species)) + geom_density_ridges()
b=ggplot(iris, aes(x = Sepal.Width, y = Species)) + geom_density_ridges()


test=cbind(ggplotGrob(a), ggplotGrob(b),size="last")
grid.draw(test)
.imgur.com/gTshi.jpg

一个可能的解决方案是,首先使用包
重塑2
,然后使用
ggplot2
的刻面

library(ggplot2)
library(ggridges)

long_iris <- reshape2::melt(iris[c(1, 2, 5)], id.vars = "Species")

g <- ggplot(long_iris) + 
  geom_density_ridges(aes(x = value, y = Species)) +
  theme_ridges() +
  facet_wrap(~ variable)

g
库(ggplot2)
图书馆(GG)

长虹膜有一种密度。。
高度
参数的选项

库(devtools)

install\u github(“clauswilke/ggridges”)


a您为什么说它与CRAN软件包版本不兼容?我的
ggridges
软件包版本是0.5.1,与CRAN的版本相同,并且您的代码确实有效。Upvote,BTW.idk,我的CRAN软件包安装可能有问题,我会检查一下。是的,我已经从CRAN重新安装了软件包,它工作得很好,所以我编辑了最初的评论,以免混淆任何人。这是一个非常好的解决方案,我想更多地支持它(我投了Upvote)。对不起,如果我没有添加“接受答案”。它也适用于单独的绘图(每个不同的文件对应一个绘图),而无需将它们放入网格中。