Question

我是新手，我想创建一个基本的应用程序，该应用程序从用户那里获取一些信息，然后在后台运行一些R代码并保存结果。（我可能最终会绘制结果，但这并不难。）但是我在使用输入的文件夹时遇到问题。运行该应用程序后，我得到NA作为输出。我也尝试了list.files而不是path.expand，但是同样的问题。如果有人能告诉我我做错了什么，我将不胜感激。 ps。我也想使用checkGroup输入，并且用户可以选择所有3个选择。

基于闪亮的示例：

react-plotly.js

Answer 1

在服务器代码中，您需要将调用移至观察者外部的外部，并将调用固定为parseDirPath。这样的事情应该起作用：

server<- function(input, output,session) {

  volumes = getVolumes()

  shinyDirChoose(input, "dir", roots = volumes, session = session)

  observe({

    if(length(input$dir) != 1 ) {
      dir.path <- parseDirPath(volumes,input$dir)
      output$rawInputValue<-renderText({dir.path})
    }
  })
}

ShinyApp：获取文件夹作为输入，并使用该文件夹中的文件作为R函数的输入

1 个答案: