Utilizzo della didascalia della tabella sul file di markdown R utilizzando knitr da utilizzare in pandoc per convertire in pdf

Question

Mi chiedo se sia possibile utilizzare le didascalie delle tabelle come le didascalie delle figure utilizzando knitr nel file .Rmd?

Ho visto le opzioni per la didascalia della figura ma non ho visto l'opzione per la didascalia della tabella. Voglio anche rimuovere il messaggio come "% latex table generated in R 2.15.2 by xtable 1.7-0 package % Wed Mar 06 15:02:11 2013".

ho usato tavola X per creare la tabella: Il codice di esempio che ho usato è il seguente:

```{r table2, results='asis', message=FALSE} 
library(xtable) 
print(xtable(head(iris))) 
``` 

La tabella ho ottenuto dopo l'elaborazione attraverso Pandoc è la seguente:

Ho provato a usare message = FALSE nel file Rmd per eliminare il messaggio mostrato sopra. Voglio anche sapere se è possibile aggiungere automaticamente la didascalia per la tabella in Rmd?

Per didascalia intendo qualcosa come di seguito (questo è per la figura) e il numero di figura viene aggiornato automaticamente.

Questa uscita è un'istantanea dal pdf generato da pdf utilizzando il file markdown creato da knitr.

Grazie.

Answer 1

Se non si desidera utilizzare una soluzione solo LaTeX/HTML con il pacchetto altrimenti straordinario xtable, è possibile ottenere lo stesso risultato con il markdown di Pandoc. Una possibilità è quella di aggiungere il caption manually sotto la tabella, o utilizzare il mio R Pandoc writer package:

> library(pander)       # load pkg 
> panderOptions('table.split.table', Inf) # not to split table 
> set.caption('Hello Fisher!')   # add caption 
> pander(head(iris))      # show (almost) any R object in markdown 
------------------------------------------------------------------- 
Sepal.Length Sepal.Width Petal.Length Petal.Width Species 
-------------- ------------- -------------- ------------- --------- 
    5.1   3.5   1.4   0.2  setosa 

    4.9   3.0   1.4   0.2  setosa 

    4.7   3.2   1.3   0.2  setosa 

    4.6   3.1   1.5   0.2  setosa 

    5.0   3.6   1.4   0.2  setosa 

    5.4   3.9   1.7   0.4  setosa 
------------------------------------------------------------------- 

Table: Hello Fisher! 

Quindi utilizzare Pandoc per convertire questo file Markdown in HTML, LaTeX, docx, altri formati di documento popolari odt o qualsiasi.

Answer 2

È possibile inserire tabelle con didascalie numerate automaticamente nel contrassegno per l'elaborazione con pandoc utilizzando il codice knitr diretto. Inserire questo frammento di codice nella parte superiore del file .RMD:

```{r setup, echo=FALSE} 
tn = local({ 
    i = 0 
    function(x) { 
    i <<- i + 1 
    paste('\n\n:Table ', i, ': ', x, sep = '') 
    # The : before Table tells pandoc to wrap your caption in <caption></caption> 
    } 
}) 
knit_hooks$set(tab.cap = function(before, options, envir) { 
    if(!before) 
    tn(options$tab.cap) 
}) 
default_output_hook = knit_hooks$get("output") 
knit_hooks$set(output = function(x, options) { 
    if (is.null(options$tab.cap) == F) 
    x 
    else 
    default_output_hook(x,options) 
}) 
``` 

Per inserire una tabella didascalia numerata:

```{r myirischunk, tab.cap="This is the head of the Iris table"} 
kable(head(iris)) 
``` 

sovrascrivendo il gancio di uscita e usando tab.cap non è necessario per ingombrare le opzioni del blocco con risultati = 'asis'.

Grazie Knitr!

PS: Se si desidera convertire in latex/pdf, probabilmente si vorrebbe che il lattice numerasse i tavoli per voi. In tal caso, è possibile modificare tn(options$tab.cap) in paste('\n\n:', options$tab.cap, sep=''), ma non l'ho verificato.

Answer 3

È possibile eseguire questa operazione con xtable. Aggiungi caption a xtable e comment=FALSE alla funzione print.

print(
    xtable(
    head(iris), 
    caption = 'Iris data' 
), 
    comment = FALSE, 
    type = 'latex' 
) 

Vedere la documentazione xtable e print.xtable.