R: knitr: pander: Ausrichtung der Überschrift auf Tabelle

Question

Ich versuche, eine Beschriftung zu einer Pandoc-Tabelle in einer Rmarkdown-Datei (Ausgabe in PDF) zentrieren. Der Tisch ist page-zentriert und ich möchte, dass die Beschriftung ähnlich zentriert ist. Ich kann keine Option in pander/pandoc.table finden, die mir das in Rmarkdown ermöglicht, das ich in Rstudio/Knitr schreibe. Meine einzige Lösung ist derzeit, eine Kette von ... nbsp aufzunehmen;

Ich habe panderOptions überprüft, und ich habe auch die Kommentare (ohne Erfolg) in xtable caption alignment left aligned with table or centered (using knitr), durch Einfügen von Code in der Yaml-Header. Und ich habe einen Zeilenumbruch wie hier vorgeschlagen hinzugefügt: Issue with creating PDf file with Pander+Knitr: Error when putting table with caption and plot directly next to each other.

Alle Vorschläge wären sehr willkommen.

Danke, Richard

Rmarkdown doc:

header-includes: 
- \usepackage[ 
    singlelinecheck=false, 
    justification=centering 
    ]{caption} 
output: 
    pdf_document 
--- 

```{r table2, echo=FALSE, message=FALSE, warnings=FALSE, results='asis'} 
library(pander) 
panderOptions('keep.line.breaks', TRUE) 
table2 <- "HHHH member | Description of future  
      H11111    | standard model  
      H22222    | low model  
      H33333    | decreasing projection" 
df2 <- read.delim(textConnection(table2), header=FALSE, sep="|", strip.white=TRUE, stringsAsFactors=FALSE) 
names(df2) <- unname(as.list(df2[1,])) 
df2 <- df2[-1,] # remove first row 
row.names(df2) <- NULL 
pandoc.table(df2, 
      caption= "Table 2. Insert title here\n", style = "multiline", split.cells = c(20, 25)) 
``` 

System: Linux Mint (17.1)/Ubuntu Trusty RStudio: 0.98.1103 Pander: 0.6.0 Knitr: 1.12. 3

Answer 1

Das einfache Hinzufügen --- an der Spitze löste das Problem auf meiner Maschine.

--- 
header-includes: 
- \usepackage[ 
    singlelinecheck=false, 
    justification=centering 
    ]{caption} 
output: 
    pdf_document 
--- 

```{r table2, echo=FALSE, message=FALSE, warnings=FALSE, results='asis'} 
library(pander) 
panderOptions('keep.line.breaks', TRUE) 
table2 <- "HHHH member | Description of future  
      H11111    | standard model  
      H22222    | low model  
      H33333    | decreasing projection" 
df2 <- read.delim(textConnection(table2), header=FALSE, sep="|", strip.white=TRUE, stringsAsFactors=FALSE) 
names(df2) <- unname(as.list(df2[1,])) 
df2 <- df2[-1,] # remove first row 
row.names(df2) <- NULL 
pandoc.table(df2, 
      caption= "\\label{tab:MyLabel}Insert title here\n", style = "multiline", split.cells = c(20, 25)) 
``` 

In table&nbsp;\ref{tab:MyLabel} blabla 

\autoref{tab:MyLabel} 

Edit: fügen Sie ein Label und Verweis auf die Tabelle in LaTeX Stil