图4在1 pdf内的不同情节

Question

我有两个数据框架，我想要从他们产生3个情节，并将他们放在一个pdf文件作为一个单一的列。

我希望所有的图都有相同的x轴限制(基本上是相同的x轴)，甚至认为它们的名称和获取方式不同。

数据文件看起来是这样的：

d1

     X          Y       Z
0.04939317 -0.4622222  13651
0.03202451 -0.4261000  13401
0.09950793 -0.3233025  13151
0.11548556 -0.4637981  12486
0.09817597 -0.4751886  12236
0.15770701 -0.5819355  11986

和d2

   V0  V1   V2    V3   sign
   1   1  0.379 0.612   pos
   2   1  0.378 0.620   pos
   3   1  0.578 0.571   neg
   4   1  0.978 0.561   pos
   5   1  0.758 0.261   neg
   6   1  0.378 0.126   neg

P.S :两个数据帧都比这个大，这只是的一部分

V0，V1和Z的范围从1到20000

我创作的情节如下：

来自d2

d2plot=ggplot(d1, aes(V0,V1, fill=sign)) + 
    geom_tile()+ scale_fill_manual(values = c("neg" = "yellow", "pos"="red")) +
    geom_vline(xintercept =10000 ) +
    geom_text(mapping=aes(x=10000,y=0, label="Stop"), 
    size=4, angle=90, vjust=-0.4, hjust=0)

来自d1

d1plot = ggplot(d2) + 
    geom_errorbarh(aes(x=z,xmin=z-50,xmax=z+50, y=Y, height = 0.02),
    color="red")+ opts(legend.position = "none")  +
    geom_vline(xintercept = 10000) +
    geom_text(mapping=aes(x=10000,y=-0.3, label="Stop"), 
    size=4, angle=90, vjust=-0.4, hjust=0)

我试过grid.arrange(d1plot, d2plot, ncol=1)，但是x轴对于每一幅图都是不同的，我试着改变长轴比，但这会改变y轴。我也尝试使用facet_wrap，但是我的x轴值有不同的值的问题，我只希望限制和断点是相同的，所有的图都在1列中对齐，基于1x轴来比较统计方法的值。

Answer 1

如果手动设置x轴限制，它应该可以工作。

添加

+ coord_cartesian(xlim = c(1, 20000))

然后再把它们组合在一起。

要获得不同的纵横比，可以使用

+ coord_fixed(xlim = c(1, 20000), ylim = c(1, 20000))

更改每个绘图的ylim参数以适应实际数据。

Answer 2

您还可以将每个单独的地块安全地保存到PDF中，然后在或Inkscape中打开它们，并将元素复制到一个PDF中。这也会给你一个机会，拉皮条你的图表，并添加一些额外的解释等。在这个网站(http://flowingdata.com)有许多教程，帮助你前进，但基础真的很简单。安全R绘图到PDF和打开在Illustrator，你可以选择所有的元素(并因此也复制和组合它们)。祝好运!