选择目录闪亮

Question

I have simple shiny app which run on my local PC and avaliable for users in my intranet. I tried to add button to choose folder.

Tried:

UI

library(shiny)
shinyUI(fluidPage(
                            actionButton("goButton","Choose folder"),
                            textOutput("session"))

)

Server

library(shiny)

shinyServer(function(input, output, session) {

  observe({
    if(input$goButton > 0){
      output$session <- renderText(function(){
        list.files(choose.dir())})
    }


  })

})

It works ok on my PC, but when someone use it in intranet(other PC) window to choose folder opens in my PC.

is there way to open choose folder on client PC?

Answer 1

Best option what i can find its library shinyFiles ( answer from RU_SO )

This package allow navigate throught server file system.

see shinyFilesExample()

But for me its work a bit slow and i plan to use simple dunamic selectInput with list.dirs(path = "some/path")