r - 如何在R中的字符串中的每个单词周围添加引号？

Question

我有一个字符串:

words<-"Monday, Tuesday, Wednesday, Thursday,Friday"

我只需要为每个单词添加引号:

"Monday", "Tuesday", "Wednesday", "Thursday","Friday"

得到五个字符串的长度。

我知道有很多关于这个主题的帖子，但我在 R 中没有找到任何关于它的信息。

非常感谢。

Answer 1

我们可以通过 , 来分割单词获得 list输出。我们遍历 sapply , dQuote元素，然后 paste与 toString 一起这是 paste(..., collapse=', ') 的包装器.

sapply(strsplit(words, '[, ]+'), function(x) toString(dQuote(x)))
#[1] "“Monday”, “Tuesday”, “Wednesday”, “Thursday”, “Friday”"

如果我们需要更改花哨的引号，请添加 FALSE在 dQuote

sapply(strsplit(words, '[, ]+'), function(x) toString(dQuote(x, FALSE)))