在ggplot中绘制nb对象？

Question

我想绘制英国的轮廓，以及我从空间点数据框生成的nb对象。

问题在于，英国的轮廓非常非常长，因为我的Rstudio不断崩溃。 例如，要么加载很长时间，要么我的Rstudio停止响应。

library(raster)    
UK_gadm <- getData("GADM", country="GB", level=0)
    plot(UK_gadm)

所以我使用了这个解决方案中的ggplot2，我可以通过以下命令在几分之一秒内得到英国的轮廓：

library(ggplot2)
UK <- map_data(map = "world", region = "UK") # changed map to "world"
    ggplot(data = UK, aes(x = long, y = lat, group = group)) + 
      geom_polygon() +
      coord_map()

现在的问题是，我希望nb对象能够在英国大纲的背景下进行绘图 - 但是，这似乎只能在基础R中实现， 例如 ：

plot(orotl.shp, xlim=c(-125, -115), ylim=c(42,47))
plot(orstationc.neighbors.dist, orstationc.loc, add=T, lwd=2, col="blue")

有没有什么方法可以在ggplot中绘制nb个对象，或者有没有办法让R绘制英国的轮廓而不会使我的计算机与基础R绘图功能崩溃？

Answer 1

经过一整夜的努力，管理找到一个快速，简单的解决方案。 希望这可以帮助其他有类似问题的人。

只是详细说明目标：针对shapefile绘制邻居对象（nb）。 这是为了可视化某些坐标之间的联系。 经过一些谷歌搜索后，我认为这只能通过基础R的绘图功能来完成。 然而问题是加载一个国家的shapefile（从官方来源/ gadm下载） - 它太大了。

要解决此问题，请通过maps包获取更加通用，简单的国家/地区地图，将其转换为shapefile，然后将其与邻居对象一起绘制。

这是代码：

library(spdep)

# get your neighbour object from your spatial points df
rest_neighbours <- dnearneigh(rest_spdf,0,1)

library(maps)

# get boundary of UK
UK_map <- sf::st_as_sf(maps::map(database='world',regions='UK', plot = FALSE, fill = TRUE))

# write to shapefile
st_write(UK_map, 'shapefiles/UK.shp')

# henceforth, we can just call the shapefile 
UK <- readOGR('shapefiles/UK.shp')

# plot the boundary and the neighbours
plot(UK)
plot(rest_neighbours, rest_coords, add=T, lwd=2, col="blue")

我没有意识到官方边界文件通常非常详细，这也意味着它们非常庞大，我很高兴r的地图包中有现成的淡化版本的地图。 （对不起，如果你已经知道了 - 我还在学习！）

希望这有助于其他任何人！