r - R Markdown/knitr 报告中的蜡笔

Question

我如何告诉 R Markdown/knitr 尊重 crayon color codes ?我有以下 R Markdown 报告。

---
title: "MWE"
author: "Will Landau"
date: "11/20/2017"
output: html_document
---

```{r color}
message(crayon::make_style("green")("My green message."))
```

当我编织并渲染它时，我看到了输出

## My green message.

但文字颜色不是绿色。

编辑

用例: https://github.com/wlandau-lilly/drake/issues/164

Answer 1

自 fansi现在在 CRAN 上，我将添加一个使用它的解决方案:

---
title: "fansi Rmd"
output: html_document
---

```{r color, echo = FALSE}
options(crayon.enabled = TRUE)
knitr::knit_hooks$set(message = function(x, options){
  paste0(
    "<pre class=\"r-output\"><code>",
    fansi::sgr_to_html(x = x, warn = FALSE),
    "</code></pre>"
  )
})
message(crayon::make_style("green")("My green message."))
```