R语言写一个网络爬虫的程序

求各路大神用R语言写一个网络爬虫的程序，具体是爬寻医问药网前20页的问题
问题网址 http://club.xywy.com/list_all.htm

xunyiwenyao

谢谢大神指导啊

大家帮帮忙吧

给你一个读第2页的代码，自己模仿着写完全部吧：

1. library(XML)
   
2. url<- paste("http://club.xywy.com/list_all_",2:20,".htm",sep="")
   
3. url[1]
   
4. 
   
5. html<-htmlParse(url[1],encoding="gbk")
   
6. zz<- xpathSApply(html,"//tr",xmlValue)
   
7. newdata <-iconv(zz,"utf-8","gbk")
   
8. newdata<- newdata[-c(1,22)]
   
9. newdata1 <- strsplit(newdata,"\n")
   
10. question <- sapply(newdata1,function(x) x[2])

复制代码

jiangbeilu 发表于 2016-3-18 13:36
给你一个读第2页的代码，自己模仿着写完全部吧：

大神，我需要前20页问题的具体内容，不是问题标题
能不能帮忙修改下
在这谢谢了！

给你的代码，自己摸索是可以的。
具体的内容你再考虑考虑哈。自己多学点东西

jiangbeilu 发表于 2016-3-21 10:36
给你的代码，自己摸索是可以的。
具体的内容你再考虑考虑哈。自己多学点东西

好的，我试试，主要是着急用

建宇 发表于 2016-3-21 10:55
好的，我试试，主要是着急用

试了试，写不出，因着急用，求版主帮忙写写吧，我比葫芦画瓢学习下

jiangbeilu 发表于 2016-3-21 10:36
给你的代码，自己摸索是可以的。
具体的内容你再考虑考虑哈。自己多学点东西

试了试，写不出，因着急用，求版主帮忙写写吧，我比葫芦画瓢学习下