在传统零售行业,雨天天气大概会影响晴天30%-40%的销售业绩,所以从网上获取天气数据来作分析,并根据天气数据作出预测,提前做好预防措施和提醒业务人员,把损失减少到最低就显得十分重要,用R语言的rvest包就可以方便抓取天气数据:
本文章的例子仅用于学习之用,如涉及版权隐私信息,请联系本人删除,谢谢
# install.packages("rvest")library(rvest)url<-"/weather/101280101.shtml"# 解析网页web<-read_html(url,encoding = "utf8")# 天气数据抓取weather<-web%>%html_nodes("div")%>%html_nodes("ul.t.clearfix")%>%html_nodes("li")%>%html_text()%>%strsplit(split="[\n]+")%>%as.data.frame(fix.empty.names = FALSE,row.names=c("无","date","weather","temperature","wind"))%>%t()weather<-weather[,c(-1,-2)]# 标示实时日期date<-c(Sys.Date(),Sys.Date()+1,Sys.Date()+2,Sys.Date()+3,Sys.Date()+4,Sys.Date()+5,Sys.Date()+6)weather<-data.frame(date,weather)