Reputation: 13
Normally I don't have any issues getting table data from sites, but this one is throwing me for a loop.
I've tried various suggestion from the site: [https://stackoverflow.com/questions/36392964/r-scraping-site-incrementing-loop-by-date-in-url-saving-to-csv][1] [https://stackoverflow.com/questions/16826379/scraping-from-aspx-website-using-r][2] [https://stackoverflow.com/questions/11458948/web-scraping-in-r][3]
I've tried the two methods to try and get something from the site and end up with errors.
The first approach:
#####Reading in data
library(RCurl)
library(XML)
library(xts)
#pulling rainfall data csv
direct_rainfall <- read.csv(url(getURL("http://cdec.water.ca.gov /cgi-progs/getMonthlyCSV?station_id=CVT&dur_code=M&sensor_num=2&start_date=1/1/2000&end_date=now")))
This ends with the following error: Error in function (type, msg, asError = TRUE) : Failed to connect to cdec.water.ca.gov port 80: Timed out
The second method:
#xml data pull method
require(XML)
url = "http://cdec.water.ca.gov/cgi-progs/getMonthlyCSV?station_id=CVT&dur_code=M&sensor_num=2&start_date=1/1/2000&end_date=now"
doc = htmlParse(url)
Which end with the following error: Error: failed to load external entity "http://cdec.water.ca.gov/cgi-progs/getMonthlyCSV?station_id=CVT&dur_code=M&sensor_num=2&start_date=1/1/2000&end_date=now"
I just can't figure out why I'm getting nothing when I try and pull from the URL.
Upvotes: 0
Views: 228
Reputation: 43354
If you look at the website, it's a reasonably nicely formatted CSV. Happily, if you pass read.csv
a URL, it will automatically handle the connection for you, so all you really need is:
url <- 'http://cdec.water.ca.gov/cgi-progs/getMonthlyCSV?station_id=CVT&dur_code=M&sensor_num=2&start_date=1/1/2000&end_date=now'
df <- read.csv(url, skip = 3, nrows = 17, na.strings = 'm')
df[1:5,1:10]
## X.station. X.sensor. X.year. X.month. X01 X02 X03 X04 X05 X06
## 1 CVT 2 2000 NA 20.90 19.44 3.74 3.31 5.02 0.85
## 2 CVT 2 2001 NA 7.23 9.53 3.86 7.47 0.00 0.15
## 3 CVT 2 2002 NA 3.60 4.43 8.71 2.76 2.78 0.00
## 4 CVT 2 2003 NA 1.71 4.34 4.45 13.45 2.95 0.00
## 5 CVT 2 2004 NA 3.41 10.57 1.80 0.87 0.90 0.00
Upvotes: 2