如何在knitr代码块输出中正常显示UTF-8特殊字符

问题核心原因是knitr默认会对代码块的文本输出做HTML实体转义处理，避免特殊字符破坏HTML结构，而行内代码默认跳过了这层转义，所以才会出现两者显示效果不一致的情况。

• 方法1：单个代码块快速生效
  给目标代码块添加results='asis'参数即可，修改后的代码块写法如下：

  ```{r, results='asis'}
  cat("\U2713")
  ```
  

  该参数会让knitr直接输出原始文本，不做额外转义，输出效果和RStudio控制台完全一致。

• 方法2：全局生效所有代码块
  在R Markdown文件最开头的初始化代码块中添加如下配置，后续所有代码块的输出都会默认和控制台保持一致：

  ```{r setup, include=FALSE}
  knitr::opts_chunk$set(results = 'asis')
  # 若需要保留代码输出的默认灰色背景等样式，可以用输出钩子处理
  knitr::knit_hooks$set(output = function(x, options) {
    x <- enc2utf8(x)
    paste0("<pre class='r-output'><code>", x, "</code></pre>")
  })
  ```
  

• 方法3：自定义类专属适配
  如果你是要给自定义类设置统一的打印规则，可以给你的自定义类添加knit_print方法，不需要修改全局或单个代码块参数：

  # 把your_class替换为你自定义类的名称
  knit_print.your_class <- function(x, ...) {
    # 直接调用控制台的打印逻辑，输出原始文本
    knitr::asis_output(capture.output(print(x, ...)))
  }
  

  这个方法和行内代码的渲染逻辑完全一致，不会修改原始输出的任何字符格式。

内容的提问来源于stack exchange，提问作者wurli