当运行时：激活时，外语会在DT :: datatable中变成乱码

Question

rmd文件中的下表在运行时变得很好：省略了光泽。

---
title: "Test"
runtime: shiny
output: 
    html_document:
        toc: true
---

```{r}
require(DT)
datatable(data.frame(test=c("テスト")))
```