[问题类型]:
程式咨询(我想用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