diff --git a/queries.R b/queries.R index 75583e7..0750fca 100644 --- a/queries.R +++ b/queries.R @@ -5,10 +5,27 @@ library(dplyr) library(DBI) library(xts) +# local testing env setup +os <- Sys.info()["sysname"] + linuxdir <- "/home/dylan/Personal/Projects/Hurricane Normalization/" macdir <- "~/Desktop/Personal/Projects/Hurricane Normalization/" -#baseDir <- macdir -baseDir <- linuxdir +widir <- "E/..." + +if (!is.null(os)) { + if (grepl("darwin", os, ignore.case = T)) { + cat("OS: Mac") + baseDir <- macdir + } else if (grepl("linux", os, ignore.case = T)) { + cat("OS: Linux") + baseDir <- linuxdir + } else if (grepl("windows", os, ignore.case = T)) { + cat("OS: Win") + baseDir <- windir + } else { + cat("Cannot identify OS") + } +} config <- config::get( file = paste0(baseDir, "R/dataScripts/restructured/app/config.yml")