在字符串的引号外添加单引号和逗号

add single quotes and commas outside the quotes in string

我想列出

Ids <- c("00234nisduf", "928347ksjdfn", "92837sdfjkbnfgh")
Ids
[1] "00234nisduf"     "928347ksjdfn"    "92837sdfjkbnfgh"

并将其转换为 SOQL 查询:

Id_Query <- "'00234nisduf', '928347ksjdfn', '92837sdfjkbnfgh'"

我正在寻找的输出:'00234nisduf', '928347ksjdfn', '92837sdfjkbnfgh' 每个 ID 必须有单引号,每个 ID 的引号后有一个逗号。

我已经尝试 paste(Ids, collapse = ",") 并尝试与 gsub("\"" "'", Ids) 混合使用,但到目前为止没有成功。

提前致谢!

定义一个函数,它接受一个字符串和一个新字符串,将 sQuote 应用于它的第二个参数,并使用 paste 将第二个参数与第一个参数结合起来。使用

调用该函数
Reduce(your_function, Ids)

编辑:

或者,在一行中:

Reduce(function(x,y) paste(x, y, sep=","), sQuote(Ids))