在R语言中将含15列的data.frame导出为.txt文件的技术问询

我猜你大概率是遇到了分隔符混乱、引号干扰、列名/行名冗余或者编码乱码这类常见问题——毕竟语音特征数据（像你这种带音节、音高、时长的）保存时，默认的write.table参数经常不太适配。下面给你几个针对性的实用方案：

1. 生成工具友好的制表符分隔文件（最常用） #

默认write.table会给字符列自动加引号，比如你的Syllable列里的"aI会被额外套一层引号，后续用语音分析工具读取时很容易出问题。可以这么设置：

write.table(your_df, "outfile.txt", 
            sep = "\t",          # 用制表符分隔，几乎所有语音工具都能识别
            quote = FALSE,       # 去掉所有多余引号
            row.names = FALSE,   # 不需要行号就关掉
            col.names = TRUE)    # 保留列名，方便后续识别字段含义

2. 避免德语特殊字符乱码 #

你的示例里有德语单词Einen，如果直接保存可能出现乱码，记得指定UTF-8编码：

write.table(your_df, "outfile.txt", 
            sep = "\t",
            quote = FALSE,
            row.names = FALSE,
            fileEncoding = "UTF-8")

3. 统一小数精度，避免冗余位数 #

你数据里的时长、音高都是小数，要是想让输出格式更规整（比如统一保留3位小数），先处理数据再保存：

# 先把所有数值型列筛选出来，统一保留3位小数
numeric_cols <- sapply(your_df, is.numeric)
your_df[numeric_cols] <- round(your_df[numeric_cols], 3)

# 再执行保存
write.table(your_df, "outfile.txt", sep = "\t", quote = FALSE, row.names = FALSE)

4. 复刻原始输入的对齐格式（小众需求） #

如果你想完全匹配示例里的列对齐样式（比如字符左对齐、数值右对齐），可以用sprintf自定义输出格式，适合数据量不大的情况：

# 定义每一行的格式化模板，根据你的列宽调整占位符
line_template <- "%-6s %-4s %6.2f %6.2f %6.2f %8.3f %8.3f %8.3f %8.3f %8.3f %8.3f %8.3f %8.3f %8.3f %-3s\n"

# 先写入列名
cat(sprintf(line_template, names(your_df)), file = "outfile.txt")

# 逐行写入数据
for (row_idx in 1:nrow(your_df)) {
  cat(sprintf(line_template, as.character(your_df[row_idx, ])), 
      file = "outfile.txt", append = TRUE)
}

如果你的具体问题不在上面这些场景里（比如某些列丢失、输出后列错位），可以补充更多细节，我再帮你针对性调整！

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