{r setup, include=FALSE} knitr::opts_chunk$set(eval = FALSE) 参考bookdown
library(DBI)
con <- dbConnect(RSQLite::SQLite(), ":memory:")
dbWriteTable(con, "mtcars", mtcars)
library(glue)
tbl <- "mtcars
SELECT * FROM `mtcars` where gear IN (3, 4)
{r setup, include=FALSE} knitr::opts_chunk$set(eval = FALSE) 参考bookdown
library(DBI)
con <- dbConnect(RSQLite::SQLite(), ":memory:")
dbWriteTable(con, "mtcars", mtcars)
library(glue)
tbl <- "mtcars
SELECT * FROM `mtcars` where gear IN (3, 4)