I would like to use RMarkdown and Shiny with Chinese characters. Any ideas why the below won't work?
--
title: "Untitled"
author: "test"
date: "26 January 2018"
output: html_document
runtime: shiny
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
Sys.setlocale(category = "LC_ALL", locale = "chs")
a<- "你"
```
```{r}
print(a)
```