如何批量将数字标识符转换为R语言逗号分隔的字符串序列

方法一：文本编辑器批量替换（无需代码） #

这是最快捷的通用方式，几乎所有文本编辑器都支持：

1. 将所有数字复制到编辑器中（确保每行一个数字）
2. 打开替换功能（快捷键通常为Ctrl+H）
3. 开启正则表达式匹配模式（不同编辑器选项位置不同，比如VS Code需勾选「正则表达式」选项）
4. 查找内容填入\n，替换内容填入", "
5. 点击「全部替换」
6. 在结果开头添加c("，结尾添加")，即可得到目标格式。

方法二：用R代码自动生成 #

如果数字已保存为每行一个的文本文件（比如numbers.txt），可直接用R处理：

# 读取文本文件中的数字
nums <- readLines("numbers.txt")
# 拼接成目标格式的字符串
target_str <- paste0('c("', paste(nums, collapse='", "'), '")')
# 打印结果
cat(target_str)

执行后会直接输出符合要求的代码。

示例转换结果 #

针对你提供的示例数字，转换后得到：

c("50109018", "50109019", "50109025", "50109026", "50109027", "50118001", "50202099", "50203004", "50203006", "50203008", "50203009", "50203010", "50203011", "50203012", "50203013", "50203014", "50203015", "50203016", "50203017", "50203019", "50203020", "50203022", "50203026", "50203027", "50203029", "50203030", "50203031", "50203032")

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