相关疑难解决方法(0)

我试图结合直方图和箱图来可视化连续变量.这是我到目前为止的代码

require(ggplot2)
require(gridExtra)
p1 = qplot(x = 1, y = mpg, data = mtcars, xlab = "", geom = 'boxplot') + 
     coord_flip()
p2 = qplot(x = mpg, data = mtcars, geom = 'histogram')
grid.arrange(p2, p1, widths = c(1, 2))

除了x轴的对齐外,它看起来很好.谁能告诉我如何对齐它们？或者,如果某人有更好的方法来使用此图表ggplot2,那么也会受到赞赏.