单击R Shiny中的操作按钮后执行Shell脚本

Question

我要在单击光泽按钮中的“动作”按钮后执行shell脚本。

ui.R

library(shiny)
library(shinyWidgets)

 fluidPage(
    actionButton("buttonId", "run script")
  )

server.R

library(shiny)

function(input, output, session) {
    observeEvent(input$buttonId, {
      message("running script.R")
      system("/bin/bash /apps/shiny/mot/sh_saa.sh")
    })
  }

如果我在外壳中运行R，然后

system("/bin/bash /apps/shiny/mot/sh_saa.sh")

有效！但是，当我单击按钮时，它不起作用。任何想法？ server，ui和sh_saa.sh这三个文件都位于mot中。

编辑1：

我查看了日志文件。可以看到以下错误消息：

Permission denied (publickey,gssapi-keyex,gssapi-with-mic,password)

shell脚本是：

ssh -tt user@mashine<< EOF
cd /home/Deployment/test/
./stopSaa.sh
EOF