我搞不懂我的问题是什么。下面的代码无法工作,datatable在显示Processing...时被卡住,浏览器控制台警告:
“加载资源失败:服务器响应状态为400 (不良请求)”
在服务器上:
output$dt <- DT::renderDataTable({
dtdf <- data1()[,-13:-14] %>%
mutate(Action = paste('<a class="go-map" href="" data-lat="', Latitude, '" data-long="', Longitude, '" data-zip="', ID, '"><i class="glyphicon glyphicon-pushpin"></i></a>', sep=""))
action <- DT::dataTableAjax(session, dtdf)
DT::datatable(dtdf, extensions = 'Buttons', options = list(ajax = list(url = action), dom = 'Bfrtip', buttons = c('excel', 'pdf'), pageLength = 25, columnDefs = list(list(className = 'dt-center', targets ="_all"))), escape = FALSE)
})在ui上:
DT::dataTableOutput("dt")只需更改为选项server=FALSE (如下面所示),就会像预期的那样工作。但是,我的数据集太大,无法禁用服务器端处理。
output$dt <- DT::renderDataTable({
dtdf <- data1()[,-13:-14] %>%
mutate(Action = paste('<a class="go-map" href="" data-lat="', Latitude, '" data-long="', Longitude, '" data-zip="', ID, '"><i class="glyphicon glyphicon-pushpin"></i></a>', sep=""))
action <- DT::dataTableAjax(session, dtdf)
DT::datatable(dtdf, extensions = 'Buttons', options = list(ajax = list(url = action), dom = 'Bfrtip', buttons = c('excel', 'pdf'), pageLength = 25, columnDefs = list(list(className = 'dt-center', targets ="_all"))), escape = FALSE)
}, server = FALSE)我做错了什么?
发布于 2019-04-05 17:31:32
对于任何有类似问题的人,请尝试安装最新版本!
一个新的DT安装与devtools::install_github('rstudio/DT')似乎已经解决了它为我!
https://stackoverflow.com/questions/55424222
复制相似问题