интерактивный rmarkdown документ очень медленный после публикации на shinyapps.io - PullRequest
0 голосов
/ 13 сентября 2018

Я создал действительно простой интерактивный блестящий документ RMarkdown.Это прекрасно работает, когда я запускаю документ в R studio.Но когда я публикую его в shinyapps.io, он работает очень медленно.Приложение действительно легкое, поэтому мне интересно, делаю ли я что-то не так с кодом.Код:

    ---
title: "Document.Rmd"
author: ""
date: "September 12, 2018"
output: html_document
runtime: shiny_prerendered
---
## Step 1. Create a new system, or choose a pre-existing one

```{r, context="render", echo=FALSE}

selectInput(inputId = "river", label = h3("Choose your system"),
            choices = list("St. Croix" = 1, "Create your own system" = 2))
uiOutput("riverout")



conditionalPanel(
  condition = "input$river == 2",
  textOutput("see")
)




```


```{r, context="server"}
output$riverout<-renderUI({ 
  ans<-reactive({input$test})
  output$see<-renderText(ans())
  if (input$river==1){
   # textOutput("stcroix")
 #   tmp<-"If you read this, this chunk of code is working"
   # renderText(tmp)
  # renderPrint(tmp)
 #  print(tmp)
  } else if (input$river==2){
    radioButtons("test", "Choose number of dams", c(1,2,3,4,5))

  }
  })





```
***
Habitat App 
BETA Version 1.0.1  

Приложение доступно здесь: здесь приложение доступно

...