使用 geom_sf() 绘制世界地图时缺少轴刻度和标签

Question

在绘制基本世界地图时，我没有在坐标轴上显示纬度和经度。我已经完成了 on cran 提供的一个示例geom_sf()，它确实显示了经纬度。

这是我下面的代码。

library("ggplot2")
library("sf")
#> Linking to GEOS 3.7.2, GDAL 2.4.2, PROJ 5.2.0
library("rnaturalearth")
library("rnaturalearthdata")

world <- ne_countries(scale = "medium", returnclass = "sf")
class(world)
#> [1] "sf"         "data.frame"

ggplot(data = world) +
  geom_sf() +
  coord_sf()

这是在轴上生成经纬度的示例代码。

nc <- st_read(system.file("shape/nc.shp", package="sf"))
#> Reading layer `nc' from data source `/Library/Frameworks/R.framework/Versions/3.6/Resources/library/sf/shape/nc.shp' using driver `ESRI Shapefile'
#> Simple feature collection with 100 features and 14 fields
#> geometry type:  MULTIPOLYGON
#> dimension:      XY
#> bbox:           xmin: -84.32385 ymin: 33.88199 xmax: -75.45698 ymax: 36.58965
#> epsg (SRID):    4267
#> proj4string:    +proj=longlat +datum=NAD27 +no_defs

ggplot(nc) + geom_sf()

Answer 1

coord_sf()仅当经纬线实际上一直到达轴时才绘制轴刻度。在您的世界地图中，绘图面板超出了地球的大小（您可以看到经纬网在绘图面板边缘之前结束），因此不会绘制轴刻度。

解决该问题的一种方法是关闭扩展。

library("ggplot2")
library("sf")
#> Linking to GEOS 3.7.2, GDAL 2.4.2, PROJ 5.2.0
library("rnaturalearth")
library("rnaturalearthdata")

world <- ne_countries(scale = "medium", returnclass = "sf")
class(world)
#> [1] "sf"         "data.frame"

ggplot(data = world) +
  geom_sf() +
  coord_sf(expand = FALSE)

^{由reprex 包(v0.3.0)于 2019-11-02 创建}