Я использую captioner (https://cran.r -project.org / web / packages / captioner / vignettes / using_captioner.html ) для создания заголовков таблиц в Rmarkdown - основная причина в том, что я использую huxtable для условного форматирования и экспорта в слово. Это единственное, что я нашел пронумерованные подписи.
Я пытался ссылаться на заголовки, но номер заголовка не в последовательном порядке при цитировании заголовков, а только в том случае, если table_nums (..., display = "cite") находится перед таблицами. Я пытался дать диапазон номеров таблиц, и это изменило номер последней таблицы. I Число не изменяется, если после заголовков ставится r table_nums ('third_cars_table', display = "cite"). Есть ли способ убедиться, что номера таблиц остаются в последовательном порядке? Я также был бы счастлив с лучшим решением для пронумерованных подписей.
Воспроизводимый пример:
---
title: "Untitled"
output: bookdown::word_document2
---
```{r setup, include=FALSE}
library(captioner)
library(huxtable)
library(knitr)
library(pander)
table_nums <- captioner(prefix = "Table")
fig_nums <- captioner(prefix = "Figure")
knitr::opts_chunk$set(echo = TRUE)
```
## Description of tables
I am trying to put a description of tables
and say that these results are shown table numbers ranging
from the first table (`r table_nums('first_cars_table',display = "cite")`)
to the last table (`r table_nums('third_cars_table',display = "cite")`)
```{r, results='asis',echo=FALSE,eval.after=TRUE}
tablecap1=cat(table_nums(name="first_cars_table",caption='First car table'))
kable((cars[1:5,]))
tablecap2=cat(table_nums(name="second_cars_table",caption='second car table'))
kable(cars[6:10,])
tablecap3=cat(table_nums(name="third_cars_table",caption='third car table'))
kable(cars[10:15,])
```
Результаты: 