问题描述
我是R Shiny的新用户,并且受命将一个显示需要自动更新的数据表的应用程序放在一起。通过我的研究,我发现并正确应用了reactiveFileReader
函数,以便在覆盖数据时更新应用程序中显示的数据表。它在本地完美运行,但是当我发布到shinyapps.io
时,数据表不再更新。下面是一个超级简单的应用程序,它演示了此问题:
library(shiny)
ui <- fluidPage(
titlePanel("TitleApp"),mainPanel(DT::dataTableOutput("df"))
)
server <- function(input,output,session) {
reactive_data <- reactiveFileReader(
intervalMillis = 1000,session = session,filePath = "testdata.csv",readFunc = function(filePath) {
read.csv(filePath)
}
)
output$df <- DT::renderDataTable({
reactive_data()
})
}
shinyApp(ui,server)
文件"testdata.csv"
位于项目,应用程序和rsconnect
文件夹所在的工作目录中。数据如下:
A B
1 6
2 7
3 8
4 9
5 10
更新为
A B
10 60
20 70
30 80
40 90
50 100
对这个问题有什么想法吗? 如果是这样,是否有更好的方法可以完全做到这一点? 请让我知道是否还有其他事情可以弄清楚。
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)