在傳統零售行業，雨天天氣大概會影響晴天30%-40%的銷售業績，所以從網上獲取天氣資料來作分析，並根據天氣資料作出預測，提前做好預防措施和提醒業務人員，把損失減少到最低就顯得十分重要，用R語言的rvest包就可以方便抓取天氣資料：
本文章的例子僅用於學習之用，如涉及版權隱私資訊，請聯絡本人刪除，謝謝

# install.packages("rvest")
library(rvest)
url<-"http://www.weather.com.cn/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)