写一个美化世界地图的R脚本

以下是一个美化世界地图的R脚本示例：

library(maps)
library(mapdata)
library(ggplot2)

# 加载地图数据
world_map <- map_data("world")

# 创建ggplot对象
ggplot(data = world_map, aes(x = long, y = lat, group = group)) +
  # 添加地图数据
  geom_polygon(fill = "white", color = "black") +
  # 添加国家边界线
  geom_path(color = "gray") +
  # 设置坐标轴和标签
  scale_x_continuous(expand = c(0, 0), limits = c(-180, 180)) +
  scale_y_continuous(expand = c(0, 0), limits = c(-90, 90)) +
  labs(x = "", y = "") +
  theme_void() +
  theme(panel.grid = element_blank(),
        panel.border = element_blank(),
        axis.ticks = element_blank(),
        axis.text = element_blank())

这个脚本将会画出一个白底黑边、灰色边界线的世界地图，去掉了网格线和坐标轴标签等多余元素，可以根据自己的需求进行调整。需要注意的是，这个脚本需要使用 `maps`、`mapdata` 和 `ggplot2` 这几个R包，如果您还没有安装它们，需要先安装才能运行这个脚本。