R Shining display应用程序在小部件中忙

R Shining display应用程序在小部件中忙,r,shiny,shinyjs,R,Shiny,Shinyjs,我正在开发一个包含Twitter数据获取的R应用程序。由于这个过程可能会持续一段时间,我想指出应用程序正在忙着做一些事情,所以用户不会认为页面被冻结了 在我的例子中,我以这种方式存储一些反应值: rv <- reactiveValues() rv$analysisStarted <- FALSE rv$analysisAvailable <- FALSE rv在您的情况下,progressbar将有助于检查状态。用户希望此元素能够指示状态。不幸的是,进度条必须先编码才能实现功

我正在开发一个包含Twitter数据获取的R应用程序。由于这个过程可能会持续一段时间,我想指出应用程序正在忙着做一些事情,所以用户不会认为页面被冻结了

在我的例子中,我以这种方式存储一些反应值:

rv <- reactiveValues()
rv$analysisStarted <- FALSE
rv$analysisAvailable <- FALSE

rv在您的情况下,progressbar将有助于检查状态。用户希望此元素能够指示状态。不幸的是,进度条必须先编码才能实现功能。这是一个技巧,你会看到一个进度条,但是这个对象在函数启动时停止

以下是教程:


在我看来,进度条是通知web用户网站状态的最佳方式,但它并不完全完美。此外,您还可以使用CSS更改条形图的样式,以自定义和选择您自己的颜色、大小……

我将尝试使用“技巧”。如果有帮助,我将标记为解决方案。感谢您的帮助@BRISHILY我已包括在Progress和setProgress中,它看起来好多了!很好,很高兴知道这一点
  observeEvent(input$analysisButton, {

    rv$analysisStarted <- TRUE
    rv$analysisAvailable <- FALSE

    #Processing Twitter info...

    rv$followersAnalysisStarted <- FALSE
    rv$followersAnalysisAvailable <- TRUE

  })
  output$text <- renderText({

    if (rv$analysisStarted) {
      "Server is working..."
    } else if (rv$analysisAvailable) {
     "Your report is ready :) "
    } else {
      "Enter the data to search and press analysisButton"
    }
  })