如何在R中创建一个保留撇号的字符串？

Question

我正在尝试在R中创建一个字符串，然后我可以使用它来调用SQL存储过程。

this.$(':checkbox:eq(0)').trigger(jQuery.Event( 'keydown', { keyCode: 32 } ))

如何更改输出：

Websites  <- paste('UK,','DE,','CA,', 'US', sep = " ")
print(Websites)

[1] "UK, DE, CA, US"

Answer 1

我们可以使用gsub

gsub("\\b(\\w+)\\b", "'\\1'", Websites)
#[1] "'UK', 'DE', 'CA', 'US'"

或另一种选择是

paste(sQuote(c('UK','DE','CA', 'US')), collapse=" ")

Answer 2

你可以简单地做

ModelState