将ggplot绘图地图拆分为3个框架

Question

能否将ggplot图/地图的特定部分提取出来，放在一个次要图中并将它们放在一起，同时仍然像一个整体一样添加点，例如下面的地图。

创建一个划分为三个部分的地图，可以作为一个图形进行操作（即同时向所有三个部分添加点）？

更新：可重现的示例。

set.seed(1)
dfx<-c(sample(1:1000,100),sample(2000:3000,100),sample(4000:3000,100))
dfy<-c(sample(1:1000,100),sample(2000:3000,100),sample(4000:3000,100))

p<-ggplot()+
coord_fixed()+
geom_point(aes(x=dfx,y=dfy))
p

- Elizabeth

---

在原问题中添加了一个可重现的示例...有什么想法吗？ - Elizabeth

Answer 1

我可以做到一半，但是不能保留 coord_equal 或 coord_fixed 的效果，同时允许自由缩放……希望有其他人可以加入并完成剩下的部分。（这种情况以前也出现过——等轴散点图——但我没有看到解决方案。）

dd <- data.frame(dfx,dfy)
dd2 <- transform(dd,panel=cut(dfx,seq(0,4000,by=1000),labels=1:4))
p <- ggplot(dd2)+geom_point(aes(dfx,dfy)) + coord_equal()
p + facet_wrap(~panel,nrow=1,scale="free")

- Ben Bolker

---

非常感谢您的查看。 - Elizabeth