加载多个urls并创建一个具有值的数据帧
加载多个urls并创建一个具有值的数据帧
提问于 2015-10-14 21:00:47
对于一个url，我可以使用以下方法获取变量的值：
library("RSelenium")
startServer()
remDr <- remoteDriver(browserName = "chrome")
remDr$open()
remDr$navigate("http://www.adobe.com/")
res <- remDr$executeScript('return window.s_adobe.prop1;')
res2 <- remDr$executeScript('return window.s_adobe.prop13;')如果我有多个urls：
http://www.adobe.com/
https://acrobat.adobe.com/us/en/?promoid=KLXMA如何以这种格式获取数据：
url,prop1,prop13
http://www.adobe.com/,"Home Page Template",""
https://acrobat.adobe.com/us/en/?promoid=KLXMA,"Full Width Content Page Template",85回答 1
Stack Overflow用户
回答已采纳
发布于 2015-10-14 21:36:29
url_list <- c("http://www.adobe.com/", "https://acrobat.adobe.com/us/en/?promoid=KLXMA")
startServer()
remDr <- remoteDriver(browserName = "chrome")
remDr$open()
df <- data.frame()
for (i in 1:length(url_list)) {
url <- url_list[i]
remDr$navigate(url)
Sys.sleep(15) ##A hacky way that just allows chrome to catch up
res <- remDr$executeScript('return window.s_adobe.prop1;')
res2 <- remDr$executeScript('return window.s_adobe.prop13;')
df <- rbind(df, data.frame(URL = url, prop1 = res[[1]][1], prop2 = res2[[1]][1]))
}页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/33135511
复制相关文章
相似问题
腾讯云开发者
