2016-06-16 9 views
0

R(バージョン3.3.0)のrvestパッケージ(バージョン0.3.1)を使用してフォームに情報を入力した後、 。私のコードは以下の通りです:rvestパッケージからsubmit_form()を使用すると、更新されないフォームが返される

# Load Packages 
library(rvest) 

# Specify URL 
url <- "http://www.cocorahs.org/ViewData/ListDailyPrecipReports.aspx" 
cocorahs <- html_session(url) 

# Grab Initial Form 
# Form is filled in stages. Here, only do country and date 
form.unfilled <- cocorahs %>% html_node("form") %>% html_form() 
form.filled <- form.unfilled %>% 
    set_values("frmPrecipReportSearch:ucStateCountyFilter:ddlCountry" = "840", 
      "frmPrecipReportSearch_ucDateRangeFilter_dcStartDate" = "6/15/2016", 
      "frmPrecipReportSearch_ucDateRangeFilter_dcEndDate" = "6/15/2016") 

submit_form(cocorahs, form.filled, 
      submit="frmPrecipReportSearch:btnSearch") %>% 
    html_node("form") %>% html_form() 

私は更新されたフォームを表示することを期待していました。国が米国に更新されている間、日付範囲はデフォルト(アクセス日)に戻ります。そのフィールドを更新するためには何が欠けていますか?

答えて

0

私はあなたの国の名前が必要なときは、数値を入力し

"frmPrecipReportSearch:ucStateCountyFilter:ddlCountry" = "840" 

でエラーをしたと思います。

# Load Packages 
library(rvest) 

# Specify URL 
url <- "http://www.cocorahs.org/ViewData/ListDailyPrecipReports.aspx" 
cocorahs <- html_session(url) 

# Grab Initial Form 
# Form is filled in stages. Here, only do country and date 
form.unfilled <- cocorahs %>% html_node("form") %>% html_form() 
form.filled <- form.unfilled %>% 
set_values("frmPrecipReportSearch:ucStationTextFieldsFilter:tbTextFieldValue" = "840", 
     "frmPrecipReportSearch_ucDateRangeFilter_dcStartDate" = "6/15/2016", 
     "frmPrecipReportSearch_ucDateRangeFilter_dcEndDate" = "6/15/2016") 

# submit the form and save as a new session 
session <- submit_form(cocorahs, form.filled) 

# look for a table in the nodes 
table <- session %>% html_nodes("table") 

# The table you want 
table[[7]] %>% html_table() 
以下のコードを参照してください。
関連する問題