r - 如何使用 R Shiny 中的 invalidatelater() 消除应用程序闪烁问题

Question

这个问题仍然存在于闪亮应用程序“DATATABLES”中最常用的项目之一。最终目的是从数据库中提取数据表并显示在闪亮的应用程序上，该应用程序每秒刷新一次。这是具有类似问题的示例代码，

  library(DT)

  ui <- fluidPage(
  
  tags$style(type="text/css", ".recalculating {opacity: 1.0;}"),
  
  
  h2("The mtcars data"),
  DT::dataTableOutput("mytable")
  )

  server <- function(input, output) {
  
  
  output$mytable = DT::renderDataTable({
    
    invalidateLater(1000)
    
    mtcars
  })

  
  }

shinyApp(ui, server)

乔诚推荐这里

tags$style(type="text/css", ".recalculating { opacity: 1.0 !important; }")

它工作得非常好，例如在 ggplot2 图表中，但不适用于数据表和传单地图。

是否有任何解决方法如何消除此应用程序中的闪烁？谢谢！

标签： rshiny