將腳注包裝到第二行以適合 kable 中的表格（LaTeX .Rmd）

Question

我不知道是否有一種方法可以利用強制腳注以適合表格的寬度（和換到第二行） kable在R（我針織.Rmd到PDF所以格式是膠乳）。 我已經使用了add_footnote()和footnote() 。 add_footnote函數實際上會將腳注包裝到第二行，如果它超出了表格的寬度，但它也會強制使用上標（因此，我的表格中沒有上標）。 footnote為我提供了刪除上標的選項，但我不確定如何使其與add_footnote的格式匹配並將比表格寬的腳注換行到第二行。 另一種解決方案是從add_footnote刪除上標

\captionsetup[table]{labelformat=empty}
```{r packs}
library(pacman)
p_load(tidyverse,knitr,kableExtra,janitor)

mydf <-data_frame(x=1:4,y=2:5,z=3:6)

fn1='This the footnote 1'
fn2='This is footnote 2 and is much longer'

mydf %>%
  kable(format='latex',booktabs=T,
        col.names=c('X','Y','Z'),
        caption=c('This method stretches', 'my table out in an ugly way')) %>%
  kable_styling(latex_options = c('hold_position')) %>%
  footnote(general=c(fn1, fn2),general_title="")

mydf %>%
  kable(format='latex',booktabs=T,
        col.names=c('X','Y','Z'),
        caption=c('This method ruins my title', 'and left justifies my table')) %>%
  kable_styling(latex_options = c('hold_position')) %>%
  footnote(general=c(fn1, fn2),general_title="",threeparttable = T)

mydf %>%
  kable(format='latex',booktabs=T,
        col.names=c('X','Y','Z'),
        caption=c('This is pretty close to perfect', 'if I could remove the superscripts')) %>%
  kable_styling(latex_options = c('hold_position')) %>%
  add_footnote(c(fn1, fn2))
```

針織PDF的截圖：

Answer 1

下面是@hao 建議的notation="none"選項。 它是居中對齊的。

mydf %>%
  kable(format='latex',booktabs=T,
        col.names=c('X','Y','Z'),
        caption=c('Notation="none"') %>%
  kable_styling(latex_options = c('hold_position')) %>%
  add_footnote(c(fn1, fn2), notation="none")

Answer 2

按照@hao 的建議設置threeparttable = TRUE對我有用：

add_footnote(c(fn1, fn2), threeparttable = TRUE)