The information from this request is only available for a limited time after the original query from the WQP. In the readWQPdata and readWQPqw functions, the results from this function will be attached as an attribute to the data.
Examples
# \donttest{
rawPcode <- readWQPqw("USGS-01594440", "01075",
ignore_attributes = TRUE, legacy = FALSE)
#> GET: https://www.waterqualitydata.us/wqx3/Result/search?siteid=USGS-01594440&pCode=01075&mimeType=csv&dataProfile=basicPhysChem
#> Error in httr2::req_perform(obs_url): HTTP 504 Gateway Timeout.
headerInfo <- attr(rawPcode, "headerInfo")
#> Error: object 'rawPcode' not found
wqp_request_id <- headerInfo$`wqp-request-id`
#> Error: object 'headerInfo' not found
count_info <- wqp_check_status(wqp_request_id)
#> Error: object 'wqp_request_id' not found
count_info[["dataProviders"]]
#> Error: object 'count_info' not found
# }