长江中游水文站点流量数据下载及处理

流量水位数据获取途径

千里眼水雨情查询系统
网址http://113.57.190.228:8001/#!/web/Report/RiverReport
选择自己所需的站点及时间范围，点击查询即可获得，若想要将数据导出为excel表，点击右上角导出。注意：若数据超过300页导出时则会报错，每次只能导出300页以内，如何导出更多页，笔者还未探索出方法。

下载后的数据处理

用R Studio 对下载的数据进行处理
下载好的数据为倒序排列，首先将下载好的数据按时间重新排序，保留自己想要处理的列数据，将时间列的空格全部替换为 “X”，方便下文代码对时间进行分割。

#设置工作路径
setwd("F:\\")
#加载所需的包
install.packages('openxlsx')
library(openxlsx)
install.packages('tidyverse')
library(tidyverse)
#按时间开始筛选
runoff <- read.xlsx("输入的文件名.xlsx", sheet = "Sheet0")
runoff
runoff2 <- separate(data = runoff, col = '报讯时间', into = c("day", "time"), sep = "_X_")
shaixuan <- runoff2[which(runoff2$time == "08:00"), ]#所取数据为每日8:00的，也可根据自己的需求修改
shaixuan
#输出处理好的excel数据
write.xlsx(shaixuan,file="输出的文件名.xlsx", rowNames = FALSE)