如何为R语言向量中的所有值添加双引号？

当然可以实现，分两种场景处理：

场景1：处理代码文本本身 #

如果你是要修改一段R代码的文本内容，给c()里的元素加上双引号，可以用字符串替换的方式实现。比如用R自带的gsub结合自定义替换函数：

# 原始代码字符串
original_code <- 'a <- c(one, two, three)'

# 执行替换
modified_code <- gsub("c\\((.*?)\\)", function(match) {
  # 提取括号内的元素
  elements <- strsplit(match[2], ",\\s*")[[1]]
  # 给每个元素加引号并拼接
  quoted_elements <- paste0('"', elements, '"', collapse = ", ")
  # 重新组合成c(...)格式
  paste0("c(", quoted_elements, ")")
}, original_code)

# 输出结果
cat(modified_code)
# 输出：a <- c("one", "two", "three")

这个方法会匹配c()括号内的所有单词元素，自动给它们加上双引号，适用于批量处理代码文本的场景。

场景2：已在R环境中输入错误代码导致报错 #

如果已经在R控制台输入了a <- c(one, two, three)并触发报错（因为one、two、three未定义为变量），这种情况无法从报错状态逆向恢复出带引号的向量——R会把这些标识符当作变量名查找，找不到就直接报错，不会保留原始的标识符文本。此时只能回到原始代码文本，用场景1的方法修改后重新运行。

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