[软件熟悉度]:
小弟大概使用R一个月，之前有些写过其他程式
[问题叙述]:
想利用R来抓网页进行一些图表分析
想利用xpathSApply来抓网页内容，但读不到网页内容
[程式范例]:
getdoc <- function(line){
start <- regexpr('www', line)[1]
end <- regexpr('html', line)[1]
if(start != -1 & end != -1){
url <- substr(line, start, end+3)
html <- htmlParse(getURL(url), encoding='UTF-8', useInternalNodes = T)
doc <- xpathSApply(html, "//div[@id='main-content']", xmlValue)
name <- strsplit(url, '/')[[1]][4]
write(doc, gsub('html', 'txt', name))
}
}
sapply(data, getdoc)
有上网survey过也try过许多方法一直try不出来，因此想请问各位神人问题出在哪?
doc一直读不出东西来
[关键字]:
xpathSApply