我正在使用该rvest软件包从http://www.radiolab.org/series/podcasts页面中抓取信息。抓取第一页后,我想点击底部的“下一页”链接,抓取第二页,移动到第三页,等等。
以下行给出了错误:
html_session("http://www.radiolab.org/series/podcasts") %>% follow_link("Next")
## Navigating to
##
## ./2/
## Error in parseURI(u) : cannot parse URI
##
## ./2/
检查 HTML 显示“./2/”周围有一些rvest明显不喜欢的多余内容:
html("http://www.radiolab.org/series/podcasts") %>% html_node(".pagefooter-next a")
## <a href=" ./2/ ">Next</a>
.Last.value %>% html_attrs()
## href
## "\n \n ./2/ "
问题 1:
如何才能rvest::follow_link像浏览器一样正确处理此链接?(我可以手动抓取“下一个”链接并使用正则表达式对其进行清理,但更喜欢利用提供的自动化rvest。)
在follow_link代码末尾,它调用jump_to. 所以我尝试了以下方法:
html_session("http://www.radiolab.org/series/podcasts") %>% jump_to("./2/")
## <session> http://www.radiolab.org/series/2/
## Status: 404
## Type: text/html; charset=utf-8
## Size: 10744
## Warning message:
## In request_GET(x, url, ...) : client error: (404) Not Found
深入研究代码,看起来问题出在 with 上XML::getRelativeURL,它用于dirname剥离原始路径的最后一部分(“/podcasts”):
XML::getRelativeURL("./2/", "http://www.radiolab.org/series/podcasts/")
## [1] "http://www.radiolab.org/series/./2"
XML::getRelativeURL("../3/", "http://www.radiolab.org/series/podcasts/2/")
## [1] "http://www.radiolab.org/series/3"
问题 2:
如何获取rvest::jump_to并XML::getRelativeURL正确处理相对路径?