更改表格标题的位置 (tufte_handout)

Question

这是一个 R -> Latex 问题。\n我使用 tufte_handout

\n\n

我需要将全角表格的标题放在表格下方的页边距中，因为表格太宽了。

\n\n

\n\n

这是 Rmarkdown 文件

\n\n

---\ntitle: "Untitled"\nauthor: "A. Nonymous"\ndate: "19/8/2017"\nheader-includes:\n   - \\usepackage{array}\noutput:\n  tufte::tufte_handout:\n    citation_package: natbib\n    keep_tex: yes\n    latex_engine: xelatex\n---\n\n```{r setup, include=FALSE}\nlibrary(tidyverse)\nlibrary(tibble)\nlibrary(knitr)\nlibrary(kableExtra)\nlibrary(tufte)\n\nknitr::opts_chunk$set(echo = TRUE)\n\noptions(knitr.table.format = "latex") \n```\n\n\n# table\n\n\n```{r table-1, fig.fullwidth=T, echo=FALSE}\n\ntmp <- tibble(`long titre de texte de colonne` = 1:3, \n              `encore un long titre de colonne` = 101:103,\n       `c\'est tr\xc3\xa8s long l\xc3\xa0 aussi (trop)`=31:33, \n       `mais pourquoi est-ce si long ? (oui, pourquoi?)`=c("a","b","b"))\ntmp <- as.data.frame(tmp)\n\nknitr::kable(tmp,booktabs=TRUE,caption="test de test de table, mais c\'est trop long et oh l\xc3\xa0 l\xc3\xa0 \xc3\xa7a fait une collision") %>% \n  column_spec(1, width = "10em") %>%\n  column_spec(2, width = "10em") %>%\n  column_spec(3, width = "10em") %>%\n  column_spec(4, width = "10em") \n\n```\n

\n

Answer 1

我知道这并不完全是您正在寻找的，但我遇到了同样的问题，并且将表格代码块包装起来::: {.fullwidth} :::防止了重叠的标题（至少）。请注意，我在这里仅在块“```”之前添加了一个“”以进行可视化。

\n

::: {.fullwidth}\n\\```{r table-1, fig.fullwidth=T, echo=FALSE}\n\ntmp <- tibble("long titre de texte de colonne" = 1:3, \n              "encore un long titre de colonne" = 101:103,\n       "c'est tr\xc3\xa8s long l\xc3\xa0 aussi (trop)" = 31:33, \n       "mais pourquoi est-ce si long ? (oui, pourquoi?)" = c("a","b","b"))\ntmp <- as.data.frame(tmp)\n\nknitr::kable(tmp,booktabs=TRUE,caption="test de test de table, mais c'est trop long et oh l\xc3\xa0 l\xc3\xa0 \xc3\xa7a fait une collision") %>% \n  column_spec(1, width = "10em") %>%\n  column_spec(2, width = "10em") %>%\n  column_spec(3, width = "10em") %>%\n  column_spec(4, width = "10em") \n\n\\```\n:::\n

\n