2

我有以下代码,我尝试将 url 打开到一个新选项卡中,每次将一个从 for 循环加载的新 url 打开到一个新选项卡。我直到知道是这样的:

library("RSelenium")
startServer()
checkForServer()
remDr <- remoteDriver()
remDr$open()
remDr$navigate("http://www.google.com/")
Sys.sleep(5)
myurllist <- c("https://cran.r-project.org/", "http://edition.cnn.com/", "https://cran.r-project.org/web/packages/")

for (i in 1:length(myurllist)) {
  url <- url_list[i]
  webElem <- remDr$findElement("css", "urlLink")
  webElem$sendKeysToElement(list(key = "t"))
  remDr$navigate(url)
  Sys.sleep(5)
}

从硒我找到了这个答案

4

1 回答 1

4

按 CTRL+T 打开一个新选项卡,而不是 T:

library("RSelenium")
startServer()
checkForServer()
remDr <- remoteDriver()
remDr$open()
remDr$navigate("http://www.google.com/")
url_list <- c("http://edition.cnn.com/", "https://cran.r-project.org/web/packages/")
for (url in url_list) {
  webElem <- remDr$findElement("css", "html")
  webElem$sendKeysToElement(list(key="control", "t"))
  remDr$navigate(url)
}
于 2016-01-05T13:14:23.047 回答