Есть ли способ унифицировать нумерацию заголовков таблиц в r markdown с html в r через `kable ()` и `htmltable ()`?

#r #r-markdown #kable

#r #r-markdown #kable

Вопрос:

Когда я хочу распечатать некоторые таблицы в html-отчете knitr , иногда я использую knitr::kable() , а иногда использую htmltable::htmltable .

Когда я использую bookdown::html_document2 в YAML нумерации таблиц из kable , это происходит автоматически. Однако это не для htmltable , и мне нужно использовать options(table_counter = TRUE) , который генерирует другой механизм нумерации. Есть ли способ унифицировать его?

Пример:

 ---
title: "Untitled"
author: "Guilherme"
date: "10/26/2020"
output:   
  bookdown::html_document2
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
options(table_counter = TRUE)
```

```{r cars}
library(htmlTable)
htmlTable(mtcars[1:5,1:5],
          caption = "XX")
```

```{r}
htmlTable(mtcars[1:5,1:5],
          caption = "XX")
```

```{r}
library(knitr)
kable(mtcars[1:5,1:5],
          caption = "XX")
```
  

Выходные данные:

введите описание изображения здесь

Спасибо!