中国各省市区县河流密度数据（基于1:100万全国基础地理信息数据计算）

在之前的课程：「使用 R 语言处理1:100万全国基础地理信息数据｜以行政区划矢量数据提取为例」 中，我讲解了如何使用 R 语言从 1:100 万全国基础地理信息数据库中提取行政区划矢量数据。

×

最近很多小伙伴表示自己想计算中国各省市区县的河流密度。河流数据就可以从这个地理信息数据库中提取（在那个课程的结尾我也进行了演示）：

这里我使用的是 2019 版本的 1:100 万全国基础地理信息数据：

library(tidyverse)
library(sf)
st_read("China basic geographic database 2019.gdb",
        layer = "HYDL", as_tibble = T) %>%
  st_transform(4326) -> riverline

# 去除 POINT
riverline %>%
  mutate(type = st_geometry_type(.)) %>%
  dplyr::filter(type != "POINT") -> riverline

然后再提取中国范围内的就可以了：

从这个河流数据出发就可以计算各省市区县的河流密度了，我使用的是 2021 年中国各省市区县的行政区划矢量数据。

河流密度计算公式为：河流密度 = 区域内的河流长度/区域的面积

经过计算得到了三个文件：

• 中国各省河流密度.xlsx
• 中国各城市河流密度.xlsx
• 中国各区县河流密度.xlsx

河流密度的单位均为 km/km^2。

各省河流密度（颜色越浅、河流密度越大）：

各城市河流密度（颜色越浅、河流密度越大）：

各区县河流密度（颜色越浅、河流密度越大）：

附件中也有这些图表的绘制代码和数据，感兴趣的小伙伴可以自行绘制（比较费时间），另外就是这些图打印出来挂在墙上也挺好看的！

处理方法

为了让大家更好的理解河流密度的计算过程，最近会推出 R 语言的课程进行讲解，感兴趣的小伙伴敬请期待！

点击这里跳转到 RStata 短书平台获取附件：中国各省市区县河流密度数据（基于1:100万全国基础地理信息数据计算）