1

我之前尝试过很多事情,我知道处理表格已经很痛苦了,但我仍然想知道是否有一种简单的方法来处理由 RMarkdown 创建的 Beamer 演示文稿中的表格。

这是我的 MWE,其中包含三种不同的表创建方法xtablekable并且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 演示文稿中表现良好。我在这里涵盖了广泛的基础,因为我的数据框可以同时吐出两者。也欢迎部分回答。

4

0 回答 0