Как одновременно указать выравнивание и ширину столбца с помощью xtable

Хотя проблема описана в Как установить ширину столбца и выравнивание текста в аргументе align xtable? выглядит так же, и решение выглядит многообещающе. Я не могу заставить это работать.

---
output: pdf_document
header-includes:
   - \usepackage{longtable}
   - \newcolumntype{R}[1]{>{\raggedleft\let\newline\\\arraybackslash\hspace{0pt}}p{#1}}
---

```{r, results='asis', echo=FALSE, warning=FALSE}
library(xtable)
options(xtable.comment = FALSE)

addtorow          <- list()
addtorow$pos      <- list()
addtorow$pos[[1]] <- c(0)
addtorow$command  <- c(paste("\\hline \n",
                         "\\endhead \n",
                         "\\hline \n",
                         "{\\footnotesize See next page} \n",
                         "\\endfoot \n",
                         "\\endlastfoot \n",
                         sep=""))

irisShort <- head(iris)
print(xtable(irisShort,
             digits=rep(0,6),
             align=c(
               "p{0.015\\textwidth}|",
               "R{0.37\\textwidth}|",
               "R{0.12\\textwidth}|",
               "R{0.08\\textwidth}|",
               "R{0.02\\textwidth}|",
               "p{0.35\\textwidth}|")))
```

Объявление newcolumntype в моем примере кажется неправильным, но я не знаю, как это исправить. Ошибка, которую я получаю:

! Undefined control sequence.
<recently read> \newcolumntype

Есть идеи, как это исправить?