我有一个闪亮的应用程序,有很多输入和得分功能。本身没有动作按钮。任何输入更改都会触发重新评分。
有时用户已更改输入,但需要一段时间才能更新。这可能误导用户将新状态与旧分数相关联。
我想通过一些显示提示来解决这个问题,例如:每当显示的分数过时时,动态地“分数正在计算”消息或灰色UI等。
我如何实现这一目标?有什么想法吗?
fn_run<-reactive({
scorer(inputs......)
})
output$score<-renderPrint(cat(fn_run()$score))
sidebarPanel(title="Scoring Outputs",width = 3,
h3(textOutput("title")),
h3(textOutput("score"),style="color:blue"),
)
当我将应用程序发布到shinyapps.io并且在本地闪亮的运行中无法触及时,大部分时间都会出现延迟。
答案 0 :(得分:1)
你可以用一些CSS和shinyjs包来做到这一点。
以下博客包含我认为您想要的内容:
http://deanattali.com/blog/advanced-shiny-tips/
相关代码可在此处找到:
https://github.com/daattali/advanced-shiny/blob/master/loading-screen/app.R
这将向您展示如何在应用程序加载时遮挡整个屏幕。