Returns a list of unitIDs with data during a particular time period.

airsis_availableUnits(
  startdate = strftime(lubridate::now(tzone = "UTC"), "%Y010100", tz = "UTC"),
  enddate = strftime(lubridate::now(tzone = "UTC"), "%Y%m%d23", tz = "UTC"),
  provider = "USFS",
  unitTypes = c("BAM1020", "EBAM", "ESAM"),
  baseUrl = "http://xxxx.airsis.com/vision/common/CSVExport.aspx?"
)

Arguments

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 ['APCD'|'USFS']

unitTypes

vector of unit types

baseUrl

base URL for data queries

Value

Vector of AIRSIS unitIDs.

References

Interagency Real Time Smoke Monitoring

Examples

if (FALSE) { # Fail gracefully if any resources are not available try({ unitIDs <- airsis_availableUnits(20150701, 20151231, provider = 'USFS', unitTypes = c('EBAM','ESAM')) }, silent = FALSE) }