r - R：如何使用 layout() 部分重叠地图

Question

我有三张同一地区、不同年份的地图。我想将它们并排绘制，彼此非常接近。我知道如何使用 layout() 函数来做到这一点，但它们彼此相距甚远。这就是我得到的：

这就是我要的：

我需要传递给 layout() 函数的矩阵中的单元格的某种重叠。或移动 plot() 函数的轴。但我找不到类似的东西。请问有什么帮助吗？

Answer 1

您可以选择不使用 layout(). par(new=TRUE)并且par(plt=...)是钥匙。
你做了一个漂亮的图表！尽管如此，鉴于绘制的数据，我不会制作连续的颜色条。

library("maps")

par(list(mar=c(0,0,4,0), bg="black"))
plot(0:1, 0:1, type="n", xlab="", ylab="", axes=FALSE)
title("Trois cartes de France se chevauchant", col.main="white")

# Random colors to highlight the overlapping.
set.seed(13)

par(list(new=TRUE, plt=c(.6, 1, .1, .9)))
plot(map("france", plot=FALSE), type="l", axes=FALSE, xlab="", ylab="", col=sample(c("white", "blue", "red"), 1))
par(list(new=TRUE, plt=c(.3, .7, .1, .9)))
plot(map("france", plot=FALSE), type="l", axes=FALSE, xlab="", ylab="", col=sample(c("white", "blue", "red"), 1))
par(list(new=TRUE, plt=c(0, .4, .1, .9)))
plot(map("france", plot=FALSE), type="l", axes=FALSE, xlab="", ylab="", col=sample(c("white", "blue", "red"), 1))