如何将列表转换为每个值都带有引号的字符串？答案

【问题标题】：How to turn list into string with quotation marks for each value?如何将列表转换为每个值都带有引号的字符串？
【发布时间】：2020-12-09 14:25:44
【问题描述】：

我有一个清单：

id<- c('22~1', '85L3~1')

我想把它变成这样的字符串：

id IN ('22~1', '85L3~1')

我怎么能这样做？当我尝试这个时：

id<- c('22~1', '85L3~1')


id<- glue("id IN ('{paste(id, collapse=', ' )}')")

我明白了：

id IN ('22~1, 85L3~1')

如何解决？

【问题讨论】：

【解决方案1】：

也许这会有所帮助：

#Code
glue("id IN ('{paste(id, collapse='\\',\\'' )}')")

输出：

id IN ('22~1','85L3~1')

【讨论】：

【解决方案2】：

在base R中，我们可以使用sprintf

sprintf("id IN ('%s')", toString(id))
#[1] "id IN ('22~1, 85L3~1')"

【讨论】：