dylan/hurricane_normalization_app
1
0
Fork 0
mirror of https://github.com/dylanbenzi/hurricane_normalization_app.git synced 2026-07-29 21:01:27 +00:00
Code Issues Packages Projects Releases Wiki Activity

modify relative paths

Browse Source
This commit is contained in:
dylan
2025-11-24 13:32:25 -05:00
parent 53fec2582f
commit 6cedf35ce7
2 changed files with 2 additions and 52 deletions
Download Patch File Download Diff File Expand all files Collapse all files
dashboard.Rmd
+1 -27
View File
@@ -41,33 +41,7 @@ library(shinyWidgets)
library(paletteer)
library(shinyjs)
# local testing env setup
os <- Sys.info()["sysname"]
linuxdir <- "/home/dylan/Personal/Projects/Hurricane Normalization/"
macdir <- "~/Desktop/Personal/Projects/Hurricane Normalization/"
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")
)
source(file = paste0(baseDir, "R/dataScripts/restructured/app/queries.R"))
source(file = "queries.R")
useShinyjs()
queries.R
+1 -25
View File
@@ -5,31 +5,7 @@ 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/"
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")
)
config <- config::get(file = "config.yml")
# SUPABASE CON
con <- dbConnect(