如何在R中绘制具有相同X轴的两个图表？

Question

如何在R中使用与ggplot2相同的x轴绘制2个图表？

我正在寻找类似的东西:http: //i.stack.imgur.com/B9QT7.png

Answer 1

使用其他人提到的一个很好的baseR解决方案的经济数据集可能是.

layout(matrix(1:2, ncol = 1), widths = 1, heights = c(2,1.5), respect = FALSE)
par(mar = c(0, 4.1, 4.1, 2.1))
with(economics, plot(unemploy~date, type = 'l', xaxt = 'n', main = 'My Great Graph'))
par(mar = c(4.1, 4.1, 0, 2.1))
with(economics, plot(pop~date, type = 'l'))

您会注意到,您根本不需要重新整形数据,因为您明确地制作了两个图形而不必使用一个函数,其中数据被分割为一个因子.而且,这两个图可以是几乎任何东西......就像第二个可能是直方图.此外,您还会注意到,在此代码中,您可以轻松地将相对高度设置为您想要的任何高度.

(这段代码的执行速度比ggplot2解决方案要快得多......如果重要的话......比如对网站或其他东西进行实时更新,或者你有很多数据,或者需要制作很多这些图表)