[問題類型]:
程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來)
[軟體熟悉度]:
使用者(已經有用R 做過不少作品)
[問題敘述]:
我最近做了一隻Shiny程式，但它需要的運算耗時比較久，
（而且在shinyapps.io上花的時間比我在本地長很多...）
好奇有沒有可能在UI裡面加一行提示（例如「運算中，請稍候」之類的），
而且只在結果還沒出來時才有那一行？
我知道也許長期目標是讓我的程式碼更有效率一點，
但目前我還想不到改寫的方式。 orz
[程式範例]:
ui <- fluidPage(
# Other UI elements
conditionalPanel(condition = "output.done == 'FALSE'",
helpText("運算中，請稍候"))
)
server <- function(input, output) {
output$done <- reactive({"FALSE"})
# Complicated processes
output$done <- reactive({"TRUE"})
outputOptions(output, "done", suspendWhenHidden = FALSE)
}
[關鍵字]:
shiny, dynamic UI