Cómo usar parámetros de SQL en un fragmento de SQL de reducción de R

Tal vez esta sea una solución para ti, usando glue_sql, funciona en mi computadora

https://community.rstudio .com/t/using-multiple-r-variables-in-sql-chunk/2940/13

Rmd trozos:

library(DBI)
library(glue)
library(RSQLite)

con <- DBI::dbConnect(RSQLite::SQLite(), ":memory:")
dbWriteTable(con, "mtcars", mtcars, overwrite = TRUE)

cyl_int <- c(4L, 6L)
cyl_sql <- glue_sql("{cyl_int*}")

  SELECT * FROM mtcars
  WHERE cyl IN (?cyl_sql)
  LIMIT 3

Para una columna de fecha, es posible que deba formatearla correctamente de acuerdo con su base de datos o usar to_date(etc, '%d%...') Aquí en sqlite es fácil con fechas ISO-8601, un ejemplo:

library(DBI)
library(glue)
library(RSQLite)

con <- DBI::dbConnect(RSQLite::SQLite(), ":memory:")
mtcars$DATE_1 <- seq(from = Sys.Date() - 15, to = Sys.Date() + nrow(mtcars) -16, by = 1) %>% as.character()
dbWriteTable(con, "mtcars", mtcars, overwrite = TRUE)

cyl_int <- c(4L, 6L)
cyl_sql <- glue_sql("{cyl_int*}")

d_date_sql <- glue_sql("{Sys.Date()*}", .con = con)

Tenga en cuenta que debe especificar el parámetro .con para los parámetros de carácter, como se dijo aquí

  SELECT cyl, mpg, DATE_1 FROM mtcars
  WHERE DATE_1 >= ?d_date_sql
  ORDER BY DATE_1