我学习的一种方法是慢慢地通过其他人的代码,弄清楚他们做了什么。我在GitHub上找到this neat bit of code,它返回搜索字词的搜索结果数。
我理解这个函数的每一行,除了以“search.value”开头的行。这条线在做什么?我知道它需要一个带有数字的html div并提取数字,但对于我的生活,我不知道它是如何做到的。
非常感谢任何帮助。
require(RCurl)
require(XML)
google.counts<-function(s){
search.url<-paste("http://www.google.com/search?q=",gsub(" ","+",s),sep="")
search.html<-getURL(search.url)
parse.search<-htmlTreeParse(search.html,useInternalNodes = TRUE)
search.nodes<-getNodeSet(parse.search,"//div[@id='resultStats']")
search.value<-strsplit(xmlValue(search.nodes[[1]])," ",fixed=TRUE)[[1]][2]
return(as.numeric(gsub(",","",search.value,fixed=TRUE)))
}
答案 0 :(得分:1)
您可以使用debug
功能
debug(google.counts)
google.counts("test")
这将使您进入调试“浏览器”,您可以继续按Enter键逐步执行每一行功能。您还可以像在普通R提示中那样查看变量的内容。