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
#> WQX3 services are in-development, use with caution.
headerInfo <- attr(rawPcode, "headerInfo")
wqp_request_id <- headerInfo$`wqp-request-id`
count_info <- wqp_check_status(wqp_request_id)
count_info[["dataProviders"]]
#> name completeOrCancelled failed sourceRowCount outputRowCount
#> 1 epa TRUE FALSE 1 0
#> 2 usgs TRUE FALSE 66 65
#> millisecondsToFirstResponse secondsToCompletion
#> 1 504 0
#> 2 9 0
# }