javascript - Hugo blogdown Web サイトでのコードの折り畳みの回避策

Question

Rmarkdown ドキュメントには、コード折りたたみオプションがあります-- code_folding: hide。このオプションは、blogdownパッケージで生成された Hugo Web サイトでは使用できません (この最近開かれた機能要求を参照してください)。誰かがこれに対する回避策を思いついたことがありますか? 投稿ごとに追加できる JavaScript および HTML コードでさえありますか?

たとえば、新しいディレクトリで次のコマンドを実行すると、blogdown は Hugo-lithium テーマのデフォルトの Hugo サイトを生成します。

blogdown::new_site().

このデフォルト用に生成された投稿の 1 つを以下に示します。この例にコードの折りたたみを追加することに興味があります。つまり、各 R コード ブロックの上にある Web ページの非表示/表示ボタンです。

---

title: "Hello R Markdown"
author: "Frida Gomam"
date: 2015-07-23T21:13:14-05:00
categories: ["R"]
tags: ["R Markdown", "plot", "regression"]
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(collapse = TRUE)
```

# R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see <http://rmarkdown.rstudio.com>.

You can embed an R code chunk like this:

```{r cars}
summary(cars)
fit <- lm(dist ~ speed, data = cars)
fit
```

# Including Plots

You can also embed plots. See Figure \@ref(fig:pie) for example:

```{r pie, fig.cap='A fancy pie chart.', tidy=FALSE}
par(mar = c(0, 1, 0, 1))
  pie(
    c(280, 60, 20),
    c('Sky', 'Sunny side of pyramid', 'Shady side of pyramid'),
    col = c('#0292D8', '#F7EA39', '#C4B632'),
    init.angle = -50, border = NA
 )