ggplot2 | 一行代码去除灰色背景和网格，仅保留黑色边框

ggplot2默认绘图边框、网格白色，背景浅灰。一般统计图也还勉强算作美观，但是绘制中国地图时则非常碍事。而有时在ggplot后设置theme(）这一操作会莫名其妙失灵。而众多解决方案则直接移除了所有边框和网格。
倒腾半天，终于找到了设置四周边框黑色，背景白色的最简便方法。绘制出了美观的中国1级流域地图。

ggplot() +
  geom_polygon(data = fortify(wsdiv1),
               aes(x = long, y = lat, group = id), 
               colour = "black",
               fill="lightgray")+
  xlab(NULL)+ylab(NULL)+
  scale_x_continuous(breaks=NULL)+
  scale_y_continuous(breaks=NULL)+
  theme_set(theme_bw())

背景设置，关键一行代码为

theme_set(theme_bw())

结果图：

PS：研究区为mainlandChina，因此没有绘制南海诸岛。

参考：https://d.cosx.org/d/157063-157063