R 从单个网页中删除所有表格？

对于第一个站点，数据被刮到水库数据框架中，只需要一些整理，但是对于第二个站点，有两组表，一个是上表，一个是下表，我不知道如何获取下表

地点：

一,

二,

关于如何从第二个站点获取第二个表，或者以更好的方式获取最初的所有内容，您有什么想法吗

---

谢谢大家!

readHTMLTable函数将所有表存储到一个列表中，然后可以从每个列表元素中提取该列表

flows <-  readHTMLTable("http://cdec.water.ca.gov/reportapp/javareports?name=FNF", as.data.frame = TRUE)

flows_part1 <- flows[[1]]
flows_part2 <- flows[[2]]

flows <-  readHTMLTable("http://cdec.water.ca.gov/reportapp/javareports?name=FNF", as.data.frame = TRUE)

flows_part1 <- flows[[1]]
flows_part2 <- flows[[2]]