Удобная вставка пользовательского текста в заголовки таблиц, сгенерированные pander

Question

Я создаю простую таблицу в pander. Я хотел бы иметь больший контроль над текстом, который появляется в качестве заголовка. Например код ниже:

---
title: "OddFile"
author: "Test"
date: "November 18, 2015"
output: pdf_document
---

Amazing table

```{r sourceDescribeIndicators, echo=FALSE, eval=TRUE, message=FALSE, warning=FALSE, cache=TRUE}
library(datasets)
data(mtcars)
require(reshape2)
mtcars$nme <- rownames(mtcars)
mtc_melt <- melt(data = mtcars, id.vars = c("nme"))

# Pander
require(pander)
pander(data.frame("Available Models" = unique(mtc_melt$nme)))
```

Будет генерировать следующую таблицу:

Преобразование фрейма данных, примененное к сгенерированному вектору уникальных значений, приводит к преобразованию Доступных моделей в Доступные. Модели как make.names Функция вернет тот же результат. Как мне удобно обойти это? Я заинтересован в решении, которое позволило бы мне использовать строки, которые не являются синтаксически правильными при создании таблиц с помощью pander,

Answer 1

Это не pander вопрос, но data.frame звонки make.names внутренне по умолчанию, но вы можете переопределить это поведение с помощью check.names аргумент, например:

> pander(head(data.frame("Available Models" = unique(mtc_melt$nme), check.names = FALSE)))

------------------
 Available Models 
------------------
    Mazda RX4     

  Mazda RX4 Wag   

    Datsun 710    

  Hornet 4 Drive  

Hornet Sportabout 

     Valiant      
------------------