From 3067e78f10d15d695d158834ada2bcb8ded2b2cf Mon Sep 17 00:00:00 2001 From: fawda123 Date: Mon, 13 May 2024 17:32:43 -0400 Subject: [PATCH] placholder permit for ips facilities --- data-raw/facilities.R | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/data-raw/facilities.R b/data-raw/facilities.R index 1998d89..8330af9 100644 --- a/data-raw/facilities.R +++ b/data-raw/facilities.R @@ -54,6 +54,11 @@ ipsfac <- read_sas(here('data-raw/ips1721monthentbas.sas7bdat')) |> facname == 'TECO - Big Bend' ~ 'bigbend', facname == 'HRK Piney Point' ~ 'pineypoint', T ~ entityshr + ), + mutate( + permit = case_when( + facname == 'busch' ~ 'FL0185833' + ) ) )