R语言实现简单的网页数据抓取

#安装XML包
>install.packages("XML")
#载入XML包
> library(XML)
#确定网页地址，通过网页地址分析网页表格
> url<-"http://hz.house.ifeng.com/detail/2014_10_28/50087618_1.shtml"
> tbls<-readHTMLTable(url)
> sapply(tbls,nrow)
NULL NULL
93    8

#读取网页url的第一张表
> pop<-readHTMLTable(url,which = 1)
#存储pop为CSV文档
> write.csv(pop,file="F:/pop.csv")

#保存为简单文本：
>write.table(x, file = "*.txt")
#保存为R格式文件：
>save(x, file = "*.Rdata")