我用 R 生成了以下圖表：
library(rnaturalearth)
library(rnaturalearthdata)
library(ggplot2)
library(rworldmap)
library(scales)
library(sf)
library(mapdata)
library(maptools)
library(ggthemes)
data(wrld_simpl)
antarctica <- wrld_simpl[wrld_simpl$NAME == "Antarctica", ]
pr <- " proj=laea lat_0=-90 ellps=WGS84 datum=WGS84 no_defs towgs84=0,0,0"
antarctica.laea <- spTransform(antarctica, CRS(pr))
antarctica_plot <- ggplot()
geom_polygon(data = antarctica.laea, aes(x=long, y=lat, group=group), fill = '#003f5c')
labs( x = "Longitude", y = "Latitude")
annotation_scale(location = "bl", width_hint = 0.5)
annotation_north_arrow(location = "bl", which_north = "true",
pad_x = unit(0.75, "in"), pad_y = unit(0.5, "in"),
style = north_arrow_fancy_orienteering)
theme_wsj()
antarctica_plot
如何在軸上顯示真實的緯度和經度值？
uj5u.com熱心網友回復：
您可以解決這個問題，將空間多邊形轉換(sp)為簡單的要素類并(sf)使用. 順便說一句，我找不到這些功能，并且在任何這些軟體包中都找不到...geom_sfgeom_polygonannotation_scaleannotation_north_arrow
antarctica.laea <- st_as_sf(antarctica.laea)
ggplot(antarctica.laea)
geom_sf(aes(), fill = '#003f5c')
labs( x = "Longitude", y = "Latitude")
theme_wsj()
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/476658.html