fix typos

USEPA · Dec 13, 2024 · 7df7ecb · 7df7ecb
1 parent 07985b6
commit 7df7ecb
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/data-raw/FAFData.R b/data-raw/FAFData.R
@@ -9,7 +9,7 @@ getFAF <- function(year) {
     # Create placeholder for zip file and specify filename based on year
     if (year == 2012) {
       FAFzip <- file.path(stateio_dir, "FAF4.5.1_csv_State.zip")
-      filename <- file.path(Stateio_dir, "FAF4.5.1_State.csv")
+      filename <- file.path(stateio_dir, "FAF4.5.1_State.csv")
 
     } else if (year %in% c(2013:2018)) {
       FAFzip <- file.path(stateio_dir, "FAF4.5.1_csv_State_2013-2018.zip")

diff --git a/data-raw/USASpendingData.R b/data-raw/USASpendingData.R
@@ -1,4 +1,5 @@
 source("data-raw/data_raw.R")
+library(stringr)
 #' Download Federal Government Spending data by 6-digit NAICS code
 #' By state and county from USASpending.gov.
 #' @param year A numeric value specifying year of interest.