2016-02-23 71 views
0

我的问题是真的类似于下面:[R闪亮显示“加载”,而渲染表

R shiny: display “loading…” message while table is being rendered

对不起,我没有足够的信誉发表评论,所以我创建一个新的问题。我的闪亮页面有一个renderGvis()和一个renderDataTable()来显示图表和表格。因为它首先需要load() 500万行表格,需要一段时间才能显示出来。我必须有东西来显示它正在加载,否则用户可能会离开。我发现上面的帖子非常有用,但加载消息消失太快。它之间的差距消失了,表格显示的时间大约是20秒。

之前,我上面的帖子看到,我曾尝试以下方法:

#server.R firstData is a reactive function to get the data for 1st table 
output$firstTable = reactive({ 
return(is.null(firstData())) 
}) 
#ui.R 
    conditionalPanel(
     condition = "output.firstTable", 
     box(width = 12, 
       h1("The data is loading..."))) 

然而,也消失得太快了。我不知道原因。有没有人有什么建议?

预先感谢您。

+0

@Matthew Plourde你有什么建议吗?谢谢 –

回答

1

您可能感兴趣的withProgress我在几个应用程序中使用这种方法进行大数据加载和长时间计算。

我使用的数据加载服务器功能:

stockdata<-withProgress(expr = {readRDS("sample.RDS")} 
         ,message = "Loading... Please wait") 

http://shiny.rstudio.com/articles/progress.html

+0

感谢您的回答。您能否详细解释一下您如何使用进度来封装这些大数据加载?它不在服务器功能之外吗?感谢您分享一些示例代码。 –

+0

@ Z.Zhang我已添加我使用的线 – vck

+0

非常感谢您的帮助。这就是我在寻找很长一段时间 –