我正在创建一个Shiny应用程序,最好将输出之一保存为用户的.RData文件。
我可以下载其他各种格式的数据,但不确定如何使用.RData。另一种保存R对象的方法在这里也可以。服务器端的一些伪代码如下所示:
# Make widget
widget <- 1:42
# Download widget
output$widget <- downloadHandler(
filename=paste0("widget_", Sys.Date(), ".RData"),
content=function(file){
save(widget), file=file)
}
)
我可以单击“下载”按钮,它会刷新我的窗口,但没有任何项目放入下载队列中。
我试图将一个随机森林模型保存为.RData格式。下面的代码为我工作。希望同样能为您服务。
用户界面
downloadButton('downloadModel','Download RF Model',class =“ dlButton”)
服务器
步骤1。创建一个reactValue来保存反应函数,在我的例子中是随机森林模型rf1()
# Create a reactive value rf2 to store the random forest model rf1().
rf2 <- reactiveValues()
observe({
if(!is.null(rf1()))
isolate(
rf2 <<- rf1()
)
})
第2步。完成后,将reactValue保存在downloadHandler中。
# Download Random Forest Model
output$downloadModel <- downloadHandler(
filename <- function(){
paste("RF Model.RData")
},
content = function(file) {
save(rf2, file = file)
}
)
希望这对您有用。
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句