Rselenium从findElements生成的列表中单击特定元素

我有一个工作代码，其中对于给定的URL，我捕获具有相同类名的所有元素。似乎有三个，具有不同的“ElementText”名称

我的问题是，我想单击其中一个元素（clickElement），特别是第二个名为“获取更多偏差”的元素

有人能告诉我怎么做吗？我已经成功地单击了第一个元素，但是没有单击列表中的特定元素

请参阅下面的代码，非常感谢

图书馆（资源库） 图书馆（rvest）

---

我找到了解决办法：

# Download binaries, start driver, and get client object.
rd <- rsDriver(browser = "firefox", port = 1999L)
ffd <- rd$client

ffd$navigate(paste0("https://www.XXXXXXX",sep=""))

 load_btn <- ffd$findElements(using = "css selector", "button.md-raised.blue-md-button.md-primary.md-button.md-ink-ripple")

#getting list of element names from abobe
unlist(lapply(load_btn, function(x) x$getElementText()))

下载二进制文件，启动驱动程序，获取客户端对象。

---

rd我会尝试对元素进行子集设置并单击它（因为您已经知道它是列表中的第二个元素）：

祝你好运

#My issue is here, how to I specify that I want to click the "GET MORE DEPARTURES" element?
load_btn$clickElements()

# Download binaries, start driver, and get client object.
rd <- rsDriver(browser = "firefox", port = 1999L)
ffd <- rd$client

ffd$navigate(paste0("https://www.XXXXXXX",sep=""))

 load_btn <- ffd$findElements(using = "css selector", "button.md-raised.blue-md-button.md-primary.md-button.md-ink-ripple")

#getting list of element names from abobe
unlist(lapply(load_btn, function(x) x$getElementText()))

solution<-unlist(lapply(load_btn, function(x) x$getElementText()))

load_btn <- load_btn[[which(solution== "GET MORE DEPARTURES")]]

load_btn[[2]]$ClickElement()