在R中合并数据集后用xtable输出时如何显示各数据集列标题？

要实现你想要的效果，默认的rbind+xtable组合没法自动重复列标题——因为xtable只会在表格顶部生成一次表头。我们可以通过手动插入表头行和水平线的方式来达成目标，具体步骤如下：

步骤1：准备基础数据 #

先加载xtable包并切分出需要的两个iris子集：

library(xtable)

iriss <- head(iris)
iriss1 <- tail(iris)

步骤2：合并数据并自定义表格格式 #

先把两个数据集合并，然后定义要在中间插入的表头和水平线代码，最后通过xtable的参数控制输出逻辑：

# 合并两个数据集
combined_data <- rbind(iriss, iriss1)

# 定义要插入的中间表头与水平线LaTeX代码
middle_header <- list(
  # 指定插入位置：第一个数据集（共6行）之后
  pos = list(6),
  # 插入内容：先加水平线，再插入表头行，再加一条水平线
  command = "\\hline & Sepal.Length & Sepal.Width & Petal.Length & Petal.Width & Species \\\\ \n\\hline "
)

# 打印xtable，通过参数控制格式
print(xtable(combined_data),
      include.rownames = TRUE,  # 保留原数据集的行号（比如1-6、145-150）
      add.to.row = middle_header,  # 插入中间的重复表头
      hline.after = c(-1, 0, nrow(combined_data))  # 控制水平线位置：表格顶部、初始表头后、表格末尾
)

效果说明 #

这段代码生成的LaTeX表格会完全匹配你的期望：

• 顶部保留原始表头和对应水平线
• 在第一个6行数据之后，自动插入新水平线、重复表头行、再一条水平线
• 接着展示第二个数据集的6行数据，最后在表格末尾添加收尾水平线

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