R 了解如何将数据保存到服务器:';拒绝许可';错误

R 了解如何将数据保存到服务器:';拒绝许可';错误,r,shiny,R,Shiny,我找到了解决问题的答案: 但是我不明白为什么/home/user必须是你的闪亮应用程序具有写入权限的文件夹。我的问题是,现在应用程序显示: readChar中的警告(con,5L,useBytes=TRUE): 无法打开压缩文件“/home/user”, 可能原因“没有这样的文件或目录”或readChar中出现警告(con,5L,useBytes=TRUE): 无法打开压缩文件“/home/user”,可能原因是“权限被拒绝” 有人能帮我吗 好的,我解决了上面的部分,但最后一部分仍然有问题:#加

我找到了解决问题的答案:

但是我不明白为什么
/home/user
必须是你的闪亮应用程序具有写入权限的文件夹。我的问题是,现在应用程序显示:

readChar中的警告(con,5L,useBytes=TRUE):
无法打开压缩文件“/home/user”,
可能原因“没有这样的文件或目录”或readChar中出现警告(con,5L,useBytes=TRUE):
无法打开压缩文件“/home/user”,可能原因是“权限被拒绝”

有人能帮我吗


好的,我解决了上面的部分,但最后一部分仍然有问题:#加载一个RData文件并更新输入

     # render a selectInput with all RData files in the specified folder
  output$load <- renderUI({
    choices <- list.files("C:/Users/Andreas/home/user/", pattern="*.RData")
    selectInput("input_file", "Select input file", choices)
  })
  # Save input$bins when click the button
  observeEvent(input$save, {
    validate(
      need(input$save_file != "", message="Please enter a valid filename")
    )
    bins <- input$bins
    save(bins, file=paste0("C:/Users/Andreas/home/user/", input$save_file))
    choices <- list.files("C:/Users/Andreas/home/user/", pattern="*.RData")
    updateSelectInput(session, "input_file", choices=choices)
  })
  # Load an RData file and update input
  observeEvent(input$input_file, {
    load(paste0("C:/Users/Andreas/home/user/",input$input_file))
    updateSliderInput(session, "bins", value=bins)
  })
#使用指定文件夹中的所有RData文件呈现selectInput

output$load它的意思正是所说的-
/home/user
不存在,或者服务器无权写入该文件夹。可以将其创建为运行闪亮应用程序的用户,也可以按照此处的说明进行操作:这意味着您试图读取路径为
/home/user
的文件,但该路径没有意义。即使存在名为
user
的用户,这也是一个目录。好的,我解决了它的上半部分,但最后一部分仍然存在问题:#加载一个RData文件并更新输入