Merge pull request #21 from kjsato/main-test

modified path test code part in ensemble.R
HopkinsIDD · Mar 25, 2024 · 47ab875 · 47ab875
2 parents 5240988 + ba04df7
commit 47ab875
Showing 1 changed file with 8 additions and 2 deletions.
diff --git a/scripts/ensemble.R b/scripts/ensemble.R
@@ -4,8 +4,8 @@ local_path <- paste0(dirname(here::here()))
 dir_path <- file.path(local_path, "rsv-forecast-hub/")
 data_path <- file.path(local_path, "rsv-forecast-hub/")
 print(local_path)
-dir_path <- local_path
-data_path <- local_path
+#dir_path <- local_path
+#data_path <- local_path
 print(dir_path)
 
 ## ----lib-ens, include=FALSE---------------------------------------------------
@@ -24,6 +24,12 @@ if (file.exists(tasks_json_path)) {
 } else {
   print("tasks.json does not exist.")
 }
+tasks_json_path <- file.path(dir_path, "hub-config/tasks.json")
+if (file.exists(tasks_json_path)) {
+  print("tasks.json exists.")
+} else {
+  print("tasks.json does not exist.")
+}
 ## ----setup_specifics, include=FALSE---------------------------------------------------
 print(file.path(local_path, "../../hub-config/tasks.json"))
 print(getwd())