Блог

Как я могу получить подписи к моим таблицам с плавающей точкой в pdf_document, сгенерированном rmarkdown?

Используя

 output:
  pdf_document:
    fig_caption: true
  

и

 ```{r, fig.cap='a caption'} 
myplot 
```
  

Генерирует плавающую фигуру с myplot и указанным заголовком.

Как мне добиться того же с таблицами, сгенерированными xtable?

 ```{r, results='asis', fig.cap='table caption'}
    print(xtable(table), comment = FALSE)
```
  

Я пытался использовать floating.environment = ‘figure’ в print.xtable, но безрезультатно.

Или аналогично,

 ```{r results='asis'}
knitr::kable(head(mtcars), format = 'pandoc', caption = 'Title of the table')
```
  

‘Caption’ является параметром для xtable, а не для print.xtable

 ```{r, results='asis'}
print(xtable(table, caption='Captions goes within xtable'), comment = FALSE)
```
  

Если вы все равно используете markdown, почему бы не придерживаться того же (простого и приятного) формата. Краткий пример:

 > library(pander)
> pander(table(mtcars$am), caption = 'foo')

-------
 0   1 
--- ---
19  13 
-------

Table: foo