嘿，这需求完全可以实现！我给你写了一套R语言的解决方案，连示例测试代码都准备好了，直接就能跑：

核心思路 #

我们要做的就是循环遍历每一列的位置，把三个数据框对应位置的列合并，然后用列名当文件名导出成文本文件。为了避免出错，我还加了列名校验的步骤。

完整可运行代码 #

# 先定义题目里的示例数据框
df1 <- data.frame(C1=c(1,2),C2=c(3,4))
df2 <- data.frame(C1=c(5,6),C2=c(7,8))
df3 <- data.frame(C1=c(9,10),C2=c(11,12))

# 先做个校验：确保三个数据框的列名完全一致，避免后续出问题
if (!identical(colnames(df1), colnames(df2)) || !identical(colnames(df1), colnames(df3))) {
  stop("三个数据框的列名不匹配，请检查后再运行！")
}

# 获取列名列表和总列数
col_names <- colnames(df1)
total_cols <- ncol(df1)

# 循环处理每一列
for (col_index in 1:total_cols) {
  # 提取三个数据框的当前列，合并成一个新的数据框
  combined_data <- data.frame(
    来自df1 = df1[, col_index],
    来自df2 = df2[, col_index],
    来自df3 = df3[, col_index]
  )
  
  # 用当前列的列名作为文件名，导出为文本文件
  # 这里用tab分隔，你可以根据需求改成逗号（sep=","）或者其他分隔符
  write.table(combined_data, 
              file = paste0(col_names[col_index], ".txt"),
              sep = "\t", 
              row.names = FALSE,  # 不导出行名
              quote = FALSE)      # 不给字符串加引号，让文件更整洁
}

代码细节说明 #

• 列名校验：加了identical判断，要是三个数据框列名不一样就直接报错，防止出现错位或者文件名不匹配的问题
• 合并列的命名：我把合并后的列名改成了“来自df1”这类直观的名字，你也可以改成df1_加原列名，或者其他你需要的格式
• 导出设置：用write.table导出，默认生成tab分隔的文本文件，去掉了行名和引号，要是需要CSV格式，只需要把sep改成","，文件名后缀改成.csv就行

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