此外,我们还可以设置不同投影的可视化绘制效果:结果如下:
?...,我们需使用sf包对数据进行投影转换及使用*geom_sf()*进行转换结果的可视化绘制,代码如下:
df_sf <- sf::st_as_sf(dset01_df, coords = c("long"..."#FF7F00", "red", "#7F0000"))
ggplot() +
#borders(colour = "black",fill="gray50",alpha=.5,) +
geom_sf...Evapotranspiration (PET, mm/y)",
subtitle = "processed map charts with geom_sf...element_markdown(face = 'bold',size = 12),
#设置刻度大小
axis.title = element_text(size=8),
#设置图例属性