kableExtra addfootnote general跨多行输出PDF（LaTeX） 问题 代码 玩具数据 ID% kable_造型（position=“center”，latex_options=“hold\u position”）%>% 脚注（一般标题=“注”），脚注为， general=“我想跨越的脚注相对较长 几行，相对较长的脚注 希望跨越几行。”） 输出

评论 第1期：输出在脚注中显示“makecell[1]”，我显然不想包括在内。添加参数

escape=T

并没有像我预期的那样解决这个问题

N.B.通过将

footnote\u设置为\u chunk=F

，这个问题得到了解决，但在标题开始之前引入了换行符。下面彼得的回答证明了这一点

第2期脚注不希望限制在表格长度内。我想可以在脚注字符串中手动添加换行符，但这似乎是一项乏味的工作，我希望有一种方法可以更有效地实现这一点。图中显示了（见表4，第25页）一个如何规避此问题的示例，但代码不存在

EDIT:通过调用

kbl

时设置

threeparttable=T

解决了此问题（#2）

使用pdflatex或xelatex编译似乎没有任何区别。如果您有任何见解，我们将不胜感激。

请尝试以下方法：

图书馆（kableExtra）
图书馆（magrittr）
kbl（待定），
格式='latex'，
longtable=TRUE，
align='l'，
booktab=T，
逃逸=F，
数字=2，
linesep=“”，
caption=“这是一个表格标题。”）%>%
在（c（“，“AB”，“BP”=2，“CK”=2，“JAM”=2，”），粗体=T）上方添加标题%>%
列规格（1，宽度='1.15cm'）%>%
行规格（11，hline\u after=T）%>%
行规格（12，粗体=T）%>%
kable_样式（position=“center”，latex_options=“hold_position”，full_width=FALSE）%>%
脚注（一般标题=“注”，
脚注_as_chunk=TRUE，
三部分表=真，
general=“相对较长的脚注，我希望跨越几行。相对较长的脚注，我希望跨越几行。”）

使用“常规”脚注选项“Note.”和“footnote…”文本从同一行开始。如本例所示，如下图所示

---

您的代码中没有

“makecell[1]”

。您希望显示什么而不是

'makecell[1]

？这将显示在输出@RonakShah中（即，请参见图片）。正如我的更新中提到的，我最终能够解决这个问题，我更新的Q中描述了修复。这很有帮助，是解决这个问题的第一步。考虑到审美偏好，我想要

footnote\u as\u chunk=T

。我最终编辑了TEX文件以获得所需的输出，但我想知道是否有一个修复方法仅使用kable/kableExtra？我刚刚用

footnote\u as\u chunk=T

重新运行了答案中的代码。它给出了相同的结果。我已经更新了代码。为了澄清，您是否得到了与传递到

general\u title

的字符串在同一行开始的

general

字符串的输出（即注释）？我的理解是，这是

footnote\u as_chunk=T

完成的行为，你可以从我的原始帖子中看到，即

general

字符串从“Note”的同一行开始。@Speleo4Life我刚刚在你的澄清后更新了答案-这非常有用-我错过了细微的区别。您正确设置了

footnote\u as\u chunk=TRUE

将“Note.”和“footnote….text”放在同一行，即同一文本中。有道理。

# Toy Data
ID <- c(paste("G0", as.character(1:9), sep = ""),"G10","G11","Mean")
V1 <- c(10.06,11.06,12.06,13.06,14.06,15.06,16.06,17.07,18.07,19.07,6.88,13.86)
V2 <- c(0.21,0.03,0.09,0.03,0.09,0.03,0.09,0.03,0.09,0.21,0.31,NA)
tbl <- data.frame(ID, V1, V1, V2, V1, V2, V1, V2, V2)
colnames(tbl) <- c('ID','Get. \\%','Get. \\%','K','Get. \\%','K','Get. \\%','K','P')

# Specify kable NA value and load kableExtra
options(knitr.kable.NA = '--')
require(kableExtra)

# Generate table for PDF output (LaTeX)
kbl(tbl, format = 'latex', align = 'l', booktabs = T, escape = F, digits = 2,
    linesep = "", caption = "This is a table caption.") %>%
  add_header_above(c(" ", "AB", "BP" = 2, "CK" = 2, "JAM" = 2, ""), bold = T) %>%
  column_spec(1, width = '1.15cm') %>%
  row_spec(11, hline_after = T) %>%
  row_spec(12, bold = T) %>%
  kable_styling(position = "center", latex_options = "hold_position") %>%
  footnote(general_title = "Note.", footnote_as_chunk = T, 
           general = "Relatively long footnote that I would like to span 
                     a couple of lines. Relatively long footnote that I
                     would like to span a couple of lines.")