用线连接多个面板

Question

我最近一直在处理R中的多面板绘图。我一直在尝试绘制两个图形（par（mfrow = c（1,2））并将第一个点连接到指向第二个。

例如我们有＆gt;

par(mfrow=c(2,1)
plot(15,15)
plot(15,3)

我的问题是如何从第一张图中的第一个点到第二张图中的第二个点绘制一条线？我听说过Grid包，但我似乎无法使它工作。

感谢。

Answer 1

这是我发现的例子，它可能对您有用：

layout(matrix(c(1,1,2,3), 2, 2, byrow = TRUE))
plot(runif(10), type='b', ylim=c(0,1))
x.tmp <- grconvertX(4, to='ndc')
y.tmp <- grconvertY(0.9, to='ndc')
plot(runif(20), type='l', ylim=c(0,1))
par(xpd=NA)
segments( 10, 1,
grconvertX(x.tmp,  from='ndc'), grconvertY(y.tmp, from='ndc'), col='red' )
plot(runif(20), type='l')