我想使用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"))
一些人已经通过将SpatialPolygons
转换为SpatialLines
来实现此操作,而且看起来我可以通过ggplot2(请参见帖子)来完成它,但我不明白为什么气泡图不能与SpatialPolygons
一起使用。有什么技巧可以让它起作用吗?