Fix issue w/ missing geometry in inspire_plans

elipousson · Mar 30, 2024 · 7ad2381 · 7ad2381
1 parent 65b9da9
commit 7ad2381
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/data-raw/inspire_plans.R b/data-raw/inspire_plans.R
@@ -10,6 +10,13 @@ inspire_path <- "https://services1.arcgis.com/43Lm3JYE3nM91DAF/ArcGIS/rest/servi
 inspire_source <-
   sfext::read_sf_ext(url = inspire_path) %>%
   sfext::rename_sf_col() %>%
+  dplyr::mutate(
+    plan_name_short = if_else(
+      plan_name_short == "Mary E Rodman ES",
+      "Mary E. Rodman ES",
+      plan_name_short
+    )
+  ) |>
   sf::st_transform(2804)
 
 baybrook <- inspire_source %>%

diff --git a/data/inspire_plans.rda b/data/inspire_plans.rda