如何在R中将txt文件中每行逗号分隔的文本转换为列表

方案1：最小改动适配原有逻辑 #

仅需在原有代码基础上，给每行文本拼接外层list()包裹符即可复用之前的解析逻辑：

# line为读取的单行文本
res <- eval(parse(text = paste0("list(", line, ")")))

该方案适配性强，即使元素内容包含逗号、转义引号等特殊字符，也能通过R原生解析逻辑正确识别。

方案2：无解析执行的安全实现 #

如果担心eval(parse)存在执行恶意代码的风险，可以用纯字符串处理实现转换：

# line为读取的单行文本
# 按逗号+任意前后空格分割
elements <- strsplit(line, ",\\s*")[[1]]
# 去除每个元素首尾的双引号
elements <- gsub('^"|"$', '', elements)
# 转为列表
res <- as.list(elements)

批量处理全文件示例 #

读取整个txt文件并批量转换所有行的代码参考：

# 读取所有行
all_lines <- readLines("你的文件路径.txt")
# 批量转换（以方案1为例，可替换为方案2逻辑）
all_res <- lapply(all_lines, function(line) {
  eval(parse(text = paste0("list(", line, ")")))
})

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