在 kable kableExtra 乳胶输出中添加 \\label{}

Question

我正在尝试使用 \\label{} 选项在 R 中创建一个乳胶格式的表。

类似的东西

library(tidyverse)
library(knitr)
library(kableExtra)

data_frame(a = 1:3, b = 2:4) %>% 
  kable(align = 'c', format = 'latex') %>% 
  kable_styling(full_width = FALSE)

结果输出如下，但我想将 \\label{label_value} 参数添加到带有我可以定义的 label_value 的乳胶表中

\begin{table}[H]
\centering
\begin{tabular}{c|c}
\hline
a & b\\
\hline
1 & 2\\
\hline
2 & 3\\
\hline
3 & 4\\
\hline
\end{tabular}
\end{table}

我正在尝试在 R 中自动创建表，我可以保存并包含在乳胶文档中

Answer 1

如果您在对kable的调用中添加kable ，您将根据您为代码块提供的名称自动获得一个标签。
如果您像示例中一样在顶层运行它，它有点笨拙：您需要将标签放在标题中，您将获得两个标签，您的标签和自动生成的无用标签。 例如，

library(tidyverse)
library(knitr)
library(kableExtra)

data_frame(a = 1:3, b = 2:4) %>% 
  kable(align = 'c', format = 'latex', 
       caption = "Table caption \\label{tab:example}") %>% 
  kable_styling(full_width = FALSE)

产生

\begin{table}[t]

\caption{\label{tab:}Table caption \label{tab:example}}
\centering
\begin{tabular}{c|c}
\hline
a & b\\
\hline
1 & 2\\
\hline
2 & 3\\
\hline
3 & 4\\
\hline
\end{tabular}
\end{table}

我不确定，但我希望在某些情况下您需要手动编辑自动生成的标签\\label{tab:} 。 所以使用 knitr 或 R-markdown 来避免这个问题。

Answer 2

您可以使用knitr::opts_current来控制与标题一起生成的自动标签：

> library(knitr)
> library(kableExtra)
> opts_current$set(label = "hello")
> data.frame(a = 1:3, b = 2:4) %>% 
+     kable(align = 'c', format = 'latex', 
+           caption = "Table caption") %>% 
+     kable_styling(full_width = FALSE)
\begin{table}

\caption{\label{tab:hello}Table caption}
\centering
\begin{tabular}[t]{c|c}
\hline
a & b\\
\hline
1 & 2\\
\hline
2 & 3\\
\hline
3 & 4\\
\hline
\end{tabular}
\end{table}

Answer 3

有一个内置选项。

kable(..., label = "something")

更多信息请访问： https : //github.com/haozhu233/kableExtra/issues/486