revdep/library/modeltests/new/glue/doc/engines.R

In alexpghayes/modeltests: Testing Infrastructure for Broom Model Generics

## ----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