gpt4 book ai didi

r - 如何将 SpatialPolygons 添加到 R 中的气泡图

转载 作者:行者123 更新时间:2023-12-02 01:36:51 26 4
gpt4 key购买 nike

我想使用 packge sp 中的函数 bubble 来绘制数据,我想添加一个 SpatialPolygons 层。我可以使用 spplot 轻松绘制数据,但由于某些原因,它不适用于 bubble。例如:

library(sp)
# Create SpatialPolygons
Sr1 <- Polygon(cbind(c(2,4,4,1,2),c(2,3,5,4,2)))
Srs1 <- Polygons(list(Sr1), "s1")
SpP <- SpatialPolygons(list(Srs1))
# Create SpatialPointsDataFrame
pp <- data.frame(x1=2:4,x2=2:4,att=2:4)
coordinates(pp) <- ~x1+x2
# Plot using spplot
spplot(pp, sp.layout=list("sp.polygons", SpP, fill="blue"))
# Plot using bubble
bubble(pp, sp.layout=list("sp.polygons", SpP, fill="blue"))

Some通过将 SpatialPolygons 转换为 SpatialLines 来完成此操作,看起来我可以通过 ggplot2 完成此操作(请参阅 post ),但我很困惑为什么气泡图没有不能与 SpatialPolygons 一起使用。有什么技巧可以让它发挥作用吗?

最佳答案

解决方法是使用自定义面板功能:

bubble(pp, "att",
panel=function(...) {
sp.polygons(SpP, fill="blue")
sp:::panel.bubble(...)
})

bubble

关于r - 如何将 SpatialPolygons 添加到 R 中的气泡图,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/30718146/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com