如何在R中将R Script与Shiny app连接？

Question

我开发了一个R脚本,现在我想将这个R脚本与Shiny app连接起来.即,我正在开发我的GUI in Shiny但我正面临连接RScript和Shiny的问题.我想使用Shiny app调用RScript的输出.

我查看了RStudio Shiny应用程序开发教程,但它没有帮助我进行连接.有什么方法可以解决这个问题吗？

如果可能的话,你可以给我代码"如何使用闪亮的应用程序点击按钮点击RScript".

更新:

你能用这样的东西来帮助我:我想使用闪亮的应用程序(GUI)上传csv文件,然后基于CSV文件,我已经制作了一个使用plot()函数的RScript,这个图是我想要显示的通过Shiny app GUI.

Answer 1

您可以source像使用普通的R脚本一样使用.假设你有一个被调用的R脚本,myscript.R并且它有一个被调用的函数calculate(),你想在用户按下Shiny中的按钮时调用它.

source("myscript.R")

runApp(shinyApp(
  ui = fluidPage(
    actionButton("btn", "calculate")
  ),
  server = function(input, output, session) {
    observeEvent(input$btn, {
      calculate()
    })
  }
))