如何使用R折叠HTML中的所有内容

Question

我正在尝试使用Rselenium折叠所有

    library(RSelenium)
rs <- rsDriver()
mybrowser <- rs[["client"]]
mybrowser$navigate("http://data.un.org/Explorer.aspx")
webElems <- mybrowser$findElements("css selector",  "a.ygtvspacer")
while(length(webElems)>0) {
 for(webElem in webElems){
    webElem$highlightElement(150/1000)
    webElem$clickElement()
 }
webElems <- mybrowser$findElements("css selector",  "a.ygtvspacer")
}    

硒消息：元素不可交互   （会议信息：chrome = 71.0.3578.98）   （驱动程序信息：chromedriver = 72.0.3626.7（efcef9a3ecda02b2132af215116a03852d08b9cb），platform = Windows NT 10.0.16299 x86_64）

错误：摘要：ElementNotVisible      详细信息：元素命令无法完成，因为该元素在页面上不可见。      更多详细信息：运行errorDetails方法