2

我正在使用 r markdown、latex 和具有apa_table()pdf 文档功能的包 papaja 创建 APA 样式表。我想在现有的顶部添加一个名为 col_spanner 的额外名称（两个，名称为“Cars 1”和“Cars 2”，见图），从第 2 列到并包括第 9 列，名称或标题为汽车'。

使用 kableExtra() 这不是问题，您只需添加：add_header_above(c(" ", "Cars" = 8))。但这不适用于 papaja、latex 和 pdf 文件（据我所知）。

包括代码和图片来说明。

在此处输入图像描述

{r , results= 'asis'}
library(papaja)
my_table <- t(apply(cars, 2, function(x) {
  round(c(Mean = mean(x), SD = sd(x), Min = min(x), Max = max(x)), 2) 
}))

apa_table(cbind(my_table, my_table),
          align = c("l", rep("r", 8)),
          caption = "A summary table of the cars dataset.",
          note = "This table was created using apa\\_table()",
          added_stub_head = "Variables",
          col_spanners = list(`Cars 1` = c(2, 5), `Cars 2` = c(6, 9)))
4

0 回答 0