Ошибка в UseMethod ("wrap") с ggpairs в шаблоне диссертации хаскидаун

Question

Я хотел бы использовать ggpairs() для создания матрицы графика рассеяния в документе R markdown с использованием шаблона тезиса хаскидауна.

Компиляция простого графика ggpairs работает хорошо.

Когда я немного усложняю (гистограммы графиков вместо плотностей), я получаю следующую ошибку:

Error in UseMethod("wrap") : no applicable method for 'wrap' applied to an object of class "character" Calls: <Anonymous> ... check_and_set_ggpairs_defaults -> set_to_blank_list_if_blank -> wrap

Эта ошибка не возникает, если код в блоке "ggpairs-wHistogram" просто запускается в R studio (вместо того, чтобы связывать его с тезисом).

MWE

---
# UW thesis fields
title: "MWE"
author: "author"
# End of UW thesis fields
knit: "bookdown::render_book"
site: bookdown::bookdown_site
output: 
  huskydown::thesis_pdf:
    latex_engine: xelatex
---

```{r huskydown-packages, include = FALSE}
# Ensure that huskydown package is installed and loaded.
# package includes the template files for the thesis.
if(!require(devtools))
  install.packages("devtools", repos = "http://cran.rstudio.com")
if(!require(huskydown))
  devtools::install_github("benmarwick/huskydown")
library(huskydown)
```

```{r}
# cache content of all chunks for quicker compiling
knitr::opts_chunk$set(cache=TRUE)
```

# MWE

```{r load-packages, include=FALSE}
library(ggplot2)
library(GGally) 
```

```{r ggpairs-plain}
ggpairs(iris[,1:3])
```

```{r ggpairs-wHistogram}
ggpairs(iris[,1:3],
    # DIAGONAL ELEMENTS: histograms instead of smoothed density
    diag=list(continuous=wrap("barDiag"))
)
# => this slightly more complex plot throws the error
```