Update 0-greeter-dbcreation.R
This commit is contained in:
parent
6f9cbf41e6
commit
141a3ce511
1 changed files with 27 additions and 0 deletions
|
@ -11,4 +11,31 @@ cat("\014") # Clear the console
|
||||||
|
|
||||||
box::use(
|
box::use(
|
||||||
magrittr[`%>%`]
|
magrittr[`%>%`]
|
||||||
|
,RSQLite
|
||||||
|
,DBI
|
||||||
|
,here[here]
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
# globals -----------------------------------------------------------------
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
# create database ---------------------------------------------------------
|
||||||
|
|
||||||
|
mimicDB <- DBI$dbConnect(
|
||||||
|
RSQLite$SQLite()
|
||||||
|
,here("ML","data-unshared","mimicDB.sqlite")
|
||||||
|
)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
# close database ----------------------------------------------------------
|
||||||
|
|
||||||
|
DBI$dbDisconnect(mimicDB)
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue