Closed jordansread closed 2 years ago
Deployment of the up to date services should be very soon (today?)
When that happens, we'll want to replace this with this:
sitecounts_bad_ids <- sitecounts_df %>% rename(site_id = MonitoringLocationIdentifier) %>% mutate(site_id_regex = stringr::str_extract(site_id, "[\\w]+.*[\\S]")) %>% filter(site_id != site_id_regex) %>% select(-site_id_regex)
Deployment of the up to date services should be very soon (today?)
When that happens, we'll want to replace this with this: