简单的xtable格式

Question

我正在尝试使用Xtable和Rmarkdown创建一个表。代码如下：

```{r xtable, results="asis"}
library(xtable)

data(tli)
table <- xtable(tli[1:10, ])
print(table, type = "html") 
```

我希望以下结果会产生一个漂亮的apa风格的表，如下所示： 我实际得到的是下面非常简单的表：

我错过了什么？

Answer 1

如果您不介意使用其他包（我是作者）：

library(huxtable)
data(tli)
ht <- as_hux(tli, add_colnames = TRUE)
top_border(ht)[1,] <- 1
bottom_border(ht)[1,] <- 1
bold(ht)[1,] <- TRUE
bottom_border(ht)[nrow(ht),] <- 1
ht

应该可以在TeX文档中打印出您想要的内容。