我有一个在闪亮会话期间动态创建的目录。目录名称和路径位于反应值内。如何在退出会话时删除此目录?
工作示例:
library("shiny")
ui <- fluidPage(
verbatimTextOutput("display")
)
server <- function(input,output,session) {
rv <- reactiveValues(newpath="./temporary")
fnr <- reactive({
dir.create(rv$newpath)
return(paste("Directory created"))
})
output$display <- renderPrint({
fnr()
})
session$onSessionEnded(function() {
unlink(rv$newpath,recursive=TRUE)
##unlink("./temporary",recursive=TRUE)
})
}
shinyApp(ui=ui, server=server)
这会产生错误,因为在rv$newpath
反应上下文之外调用了反应值 ( )。