如何在RSQLite与DBI包中使用SQL的IN关键字进行查询？

RSQLite 搭配 DBI 目前不支持直接用 IN :targetCyl 这种方式绑定多值参数，因为参数绑定机制通常要求单个占位符对应单个值。不过有几种实用的替代方案可以实现你要的效果：

方案1：动态生成占位符 + dbBind #

手动生成对应参数数量的占位符（?），再通过dbBind绑定多值向量：

targetCyl <- c(2, 4, 6)
# 根据参数个数生成占位符字符串
placeholders <- paste(rep("?", length(targetCyl)), collapse = ", ")
# 拼接SQL语句
sql <- sprintf("SELECT * FROM mtcars WHERE cyl IN (%s)", placeholders)

# 执行查询流程
res <- dbSendQuery(con, sql)
dbBind(res, list(targetCyl))
result <- dbFetch(res)
dbClearResult(res)

方案2：用glue_sql安全拼接参数 #

借助glue包的glue_sql函数，可以安全地将向量参数转换为IN子句的格式，同时避免SQL注入风险：

library(glue)

targetCyl <- c(2, 4, 6)
# 自动处理多值参数，生成合法的IN子句
sql <- glue_sql("SELECT * FROM mtcars WHERE cyl IN ({targetCyl*})", .con = con)
result <- dbGetQuery(con, sql)

这里的{targetCyl*}语法会自动把向量拆分为逗号分隔的格式，并且根据数据库类型做转义处理。

方案3：用dbplyr转译R语法 #

如果熟悉dplyr的语法，可以用dbplyr将R的%in%操作自动转译为SQL的IN子句，无需手动写SQL：

library(dplyr)
library(dbplyr)

targetCyl <- c(2, 4, 6)
result <- tbl(con, "mtcars") %>%
  filter(cyl %in% targetCyl) %>%
  collect() # 将数据库查询结果拉取到本地

内容的提问来源于stack exchange，提问作者user3224611