diff --git a/1_wqp_pull/src/wqp_inventory.R b/1_wqp_pull/src/wqp_inventory.R index bac7c05..3242c01 100644 --- a/1_wqp_pull/src/wqp_inventory.R +++ b/1_wqp_pull/src/wqp_inventory.R @@ -84,6 +84,7 @@ partition_wqp_inventory <- function(partitions_ind, wqp_pull_params, inventory_i filter(!(ResolvedMonitoringLocationTypeName %in% wqp_pull_params$DropLocationTypeName)) # filter out bad org names + # these orgs cause "Frequest failed [400]" errors bad_orgs <- grep(' |\\.|/', wqp_inventory$OrganizationIdentifier, value = TRUE) bad_orgs_sites <- filter(wqp_inventory, OrganizationIdentifier %in% bad_orgs)