Request data from a particular station for the desired time period. Data are returned as a single character string containing the AIRIS output.
airsis_downloadData( startdate = strftime(lubridate::now(tzone = "UTC"), "%Y0101", tz = "UTC"), enddate = strftime(lubridate::now(tzone = "UTC"), "%Y%m%d", tz = "UTC"), provider = "USFS", unitID = NULL, baseUrl = "http://xxxx.airsis.com/vision/common/CSVExport.aspx?" )
startdate | desired start date (integer or character representing YYYYMMDD[HH]) |
---|---|
enddate | desired end date (integer or character representing YYYYMMDD[HH]) |
provider | identifier used to modify baseURL |
unitID | unit identifier |
baseUrl | base URL for data queries |
String containing AIRSIS output.
Interagency Real Time Smoke Monitoring
if (FALSE) { # Fail gracefully if any resources are not available try({ fileString <- airsis_downloadData( 20150701, 20151231, provider='USFS', unitID='1026') df <- airsis_parseData(fileString) }, silent = FALSE) }