如何在Rinydown中启用表情符号,以便在Shiny-Server中发布后显示

时间:2017-07-06 08:09:06

标签: r shiny r-markdown emoji shiny-server

我有以下Rmarkdown代码,它使用Hadley的 emo(ji) 包。

---
title: "My First Shiny"
runtime: shiny
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    vertical_layout: scroll
---


```{r setup, include=FALSE}
```


Rows {data-height=800}
-----------------------------------------------------------------------

### Section1 `r strrep(emo::ji("heart_eyes_cat"), 5)`

Some text

在我的Rstudio IDE中,生成它没有问题:

enter image description here

由于图片中的高亮度,表情符号未能显示在我的 local Shiny-server.

如何启用它?

1 个答案:

答案 0 :(得分:3)

根据github documentation,您的文件应该读取如下内容(减去我留下的加号,有些懒散):

S3method(print,emoji)
export(ji)
export(ji_find)
export(ji_p)


ji_p <- function(x) {
 +  stopifnot(is.numeric(x))
 +
 +  out <- stats::symnum(x,
 +    corr = FALSE,
 +    na = FALSE,
 +    cutpoints = c(0, 1e-5, 0.001, 0.01, 0.05, 0.1, 1),
 +    symbols = c(ji("laughing"), ji("joy"), ji("grin"), ji("smile"), ji("thinking"), ji("poop"))
 +  )
 +
 +  structure(out, class = c("emoji", class(out)))
 +
 +}

我没有看到您在代码中使用(使用, 5)时显示的任何速记,现在似乎已删除了r前缀;当使用内联时,它被使用,但需要在它之前和之后使用额外的'ticks',如下所示:

 `` `r emo::ji("smile")` ``

您使用的是旧版本的提交吗?对knitr的需求已被删除,现在只需要点击。查看this latest commit doc out

我希望这是有帮助的