На диаграммах последовательности русалок DiagrammeR в R. нет стрелок на линиях. Я получаю этот результат при локальном запуске, а также при размещении кода на shinyapps.io
Сначала просто скопируйте пример кода здесь: http://rich-iannone.github.io/DiagrammeR/mermaid.html#sequence-diagrams в RStudio, и при запуске не отображаются стрелки. Обратите внимание на стрелки на диаграмме по ссылке.
Итак, я создал следующую презентацию Shiny и отправил ее в Shinyapps здесь: https://mattbrigida.shinyapps.io/seq_ex/seq_diag_example.Rmd#2
---
title: "Sequence Diagram Example Presentation"
author: "Matt Brigida"
affiliation:
date: "03/10/2016"
output: ioslides_presentation
runtime: shiny
smaller: true
---
##
```{r, echo=FALSE, message=FALSE, warning=FALSE, error=FALSE}
library(shiny)
library(DiagrammeR)
ui = shinyUI(fluidPage(
titlePanel("No Arrows on Shinyapps"),
fluidRow(
column(12, numericInput("test", "Does Nothing", value = 1))
),
fluidRow(
column(12,
DiagrammeROutput('diagram2', width = "100%")
)
)
)
)
server = function(input, output){
output$diagram2 <- renderDiagrammeR({
mermaid("
sequenceDiagram
X->>Y: No Arrows when run locally
Y->>X: No arrows when on Shinyapps
X-->>X: why??
")
})
}
shinyApp(ui = ui, server = server)
```
Там тоже нет стрелок, так что это не моя локальная установка.
Эта проблема может быть связана с: https://github.com/knsv/mermaid/issues/209 с предлагаемым решением:
однако я не уверен, как включить это возможное исправление в мои блестящие приложения для отображения стрелок? Любые идеи?
Работает локально:
- DiagrammeR версия 0.8.2
- R 3.2.3
- x86_64 GNU / Linux
- Хром 49.0.2623.87