我之前尝试过很多事情,我知道处理表格已经很痛苦了,但我仍然想知道是否有一种简单的方法来处理由 RMarkdown 创建的 Beamer 演示文稿中的表格。
这是我的 MWE,其中包含三种不同的表创建方法xtable
,kable
并且pander
.
---
title: "Habits"
author: John Doe
date: March 22, 2005
output: beamer_presentation
---
```{r,echo=FALSE}
set.seed(34123)
test_df<-data.frame(name_column=rep(c("Lorem ipsum dolor sit amet","Only lorem"),15),
column_1=as.character(round(runif(30,10^6,2*10^6),4)),
column_2=as.character(round(runif(30,10^6,2*10^6),4)),
column_3=as.character(round(runif(30,10^6,2*10^6),4)))
```
## MWE xtable
```{r,echo=FALSE,results='asis'}
print(xtable(test_df),include.rownames=FALSE,comment=FALSE)
```
## MWE pander
```{r,echo=FALSE,results='asis'}
pander(test_df,split.cells=c("25%","25%","25%","25%"))
```
## MWE kable
```{r,echo=FALSE,results='asis'}
kable(test_df)
```
我想要的是
- 长表的分页符
- 宽度拟合
- 给定固定列宽的换行符(如果我可以指定百分比更好)和对齐方式。
- 没有额外的行空间
我可以单独得到那些。例如,我可以adjustbox
与 xtable 一起使用,但如果它是 longtable 环境,则调整框不再适用。我可以使用参数指定对齐方式,例如p{3cm}
但我失去对齐方式。如果我要为此指定特殊代码,则会引发错误。
长话短说,我希望宽而长的桌子在 Beamer 演示文稿中表现良好。我在这里涵盖了广泛的基础,因为我的数据框可以同时吐出两者。也欢迎部分回答。