15 lines
462 B
R
15 lines
462 B
R
|
## ----setup, include=FALSE-----------------------------------------------------
|
||
|
|
knitr::opts_chunk$set(echo = TRUE)
|
||
|
|
library(glue)
|
||
|
|
|
||
|
|
## -----------------------------------------------------------------------------
|
||
|
|
con <- DBI::dbConnect(RSQLite::SQLite(), ":memory:")
|
||
|
|
mtcars$model <- rownames(mtcars)
|
||
|
|
DBI::dbWriteTable(con, "mtcars", mtcars)
|
||
|
|
|
||
|
|
## -----------------------------------------------------------------------------
|
||
|
|
var <- "mpg"
|
||
|
|
tbl <- "mtcars"
|
||
|
|
num <- 150
|
||
|
|
|