Create 0-data_prep.R

ML/0-data_prep.R

@@ -0,0 +1,31 @@
+rm(list = ls(all.names = TRUE)) # Clear the memory of variables from previous run.
+cat("\014") # Clear the console
+
+
+# load packages -----------------------------------------------------------
+
+box::use(
+  magrittr[`%>%`]
+  ,RSQLite
+  ,DBI[dbConnect,dbDisconnect]
+  ,here[here]
+)
+
+# globals -----------------------------------------------------------------
+
+db <- dbConnect(
+  RSQLite$SQLite()
+  ,here("ML","data-unshared","mimicDB.sqlite")
+)
+
+
+
+
+
+
+
+
+
+# close database ----------------------------------------------------------
+
+dbDisconnect(db)