如何将R语言dataframe列转换为SQL查询所需的逗号分隔带引号字符串

基础R实现（无需加载额外包） #

直接用内置的paste0函数即可完成需求：

# 生成符合SQL格式的拼接字符串，外层不带双引号
var2 <- paste0("'", var1[[1]], "'", collapse = ",")

# 如果你需要最终结果外层包裹双引号，和你给出的目标输出完全一致，用以下代码
var2 <- paste0('"', paste0("'", var1[[1]], "'", collapse = ","), '"')

代码说明： #

• var1[[1]]：提取dataframe的第一列值，你这里的var1只有1列，直接取第一列即可
• paste0("'", x, "'")：给每个列值前后添加单引号，匹配SQL的查询值格式
• collapse = ","：将所有处理好的单个字符串用逗号拼接为一个完整的长字符串
• 外层paste0('"', ..., '"')：可选步骤，给拼接好的整个字符串外层添加双引号，完全匹配你给出的目标输出格式

tidyverse实现（适合已经在使用tidyverse生态的场景） #

library(dplyr)
library(stringr)

var2 <- var1 %>%
  pull(1) %>%
  str_c("'", ., "'") %>%
  str_c(collapse = ",") %>%
  str_c('"', ., '"') # 可选：添加外层双引号

注意事项 #

如果你的列值本身包含单引号，需要先对单引号做转义，避免SQL语法错误，转义方法如下：

# 转义单引号版本的基础R实现
var2 <- paste0("'", gsub("'", "''", var1[[1]]), "'", collapse = ",")

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