我正在使用rvest来取消亚马逊的评论。在这里,我正在尝试抓取有关购买是否经过验证的信息。我尝试抓取的页面有10条评论。购买的其中9件已通过验证。 我的部分代码如下:
library(rvest)
url='https://www.amazon.com/product-reviews/B07Q378C8J'
doc <- read_html(url)
Verified = tryCatch( doc %>%
html_nodes(".a-size-mini.a-color-state.a-text-bold") %>%
html_text(),
error = function(e) list(NA))
我得到的是9个元素的向量。我需要的是一个大小为10的向量。我希望未验证的购买为NA
。
有人知道怎么做吗?非常感谢。