无法将外部R脚本从最终用户本地库运行到Shinny应用程序(shinyapp.io)

无法将外部R脚本从最终用户本地库运行到Shinny应用程序(shinyapp.io),r,deployment,shiny,shiny-server,shinydashboard,R,Deployment,Shiny,Shiny Server,Shinydashboard,已更新 我创建了一个闪亮的应用程序。最终用户可以在那里运行他们的函数(R脚本)。我通过此函数启用了这些功能(如下) 服务器.R observeEvent(输入$v1,{ infle我自己找到了答案: 在服务器页面中包含load()函数,并使用外部文件过载按钮获取源代码 在服务器内部这样的代码 load_Rdata <- function(){ if(is.null(input$file)) return(NULL) inFile <- isolate({ input$file

已更新

我创建了一个闪亮的应用程序。最终用户可以在那里运行他们的函数(R脚本)。我通过此函数启用了这些功能(如下)

服务器.R
observeEvent(输入$v1,{

infle我自己找到了答案:

在服务器页面中包含load()函数,并使用外部文件过载按钮获取源代码

服务器内部这样的代码

load_Rdata <- function(){
  if(is.null(input$file)) return(NULL)
 inFile <- isolate({ input$file })
source(inFile$datapath)
}

加载数据请向我们提供您的代码reproduce@Chris有可能吗?应该让您开始。这里的重要部分是提供一个复制您的问题的最小示例。除了我们看到您的问题外,这可能已经帮助您更好地确定确切的问题(并且可能已经自己解决了这个问题)Chris@Paul Hiemstra,我更改了内容。我希望你们现在能理解这一点。
load_Rdata <- function(){
  if(is.null(input$file)) return(NULL)
 inFile <- isolate({ input$file })
source(inFile$datapath)
}