runapp使用actionbutton从其他闪亮的应用程序中闪亮

2024年2月2日 178次阅读

当我在一个非常简单的闪亮应用程序中按动作按钮时,我试图调用另一个闪亮的应用程序.另一个应用程序位于一个名为益与ui.R和server.R文件的文件夹中,但是当我单击该按钮时没有任何反应.有可能我想做什么？

干杯.

ui.R

library(shiny)

shinyUI(fluidPage(

  # Application title
  titlePanel("RunnApp"),
    mainPanel(
      actionButton("goButton", "Go!")
    )

))

server.R

library(shiny)

shinyServer(function(input, output) {
    ntext <- eventReactive(input$goButton, {
      runApp("benefits")
  })
            })

最佳答案 临时答案：

我已经开始寻找这个问题的答案了.这个答案将及时更新.

#server.R



library(shiny)

shinyServer(function(input, output) {
  ntext <- eventReactive(input$goButton, {
    stopApp(runApp('C:/Users/Infinite Flash/Desktop/Dashboard'))
  })

  output$nText <- renderText({
    ntext()
  })
})



#ui.R

library(shiny)

shinyUI(pageWithSidebar(
  headerPanel("actionButton test"),
  sidebarPanel(
    actionButton("goButton", "Go!"),
    p("Click the button to update the value displayed in the main panel.")
  ),
  mainPanel(
    textOutput("nText")
  )
))

关于这段代码的好处是它初始化了我用stop(runApp(‘C：/ Users / Infinite Flash / Desktop / Dashboard’))语句指定的应用程序.我可以验证它确实运行了应用程序,因为我在该应用程序中有一个global.R文件,该文件有6个预先加载的数据集,应用程序在启动之前需要加载这些数据集.我知道它运行是因为在这行代码运行后,我有这些对象(由引用的应用程序中的global.R文件创建)在我的环境中.

棘手的问题是,当我(我认为这是问题)时,我收到此错误,它初始化引用的应用程序：

听http://127.0.0.1:7908

处理程序错误$add(处理程序,密钥,尾部)：密钥/已在使用中

目前这种类型的错误与闪亮的界面,是我的知识领域.要调试此错误,我需要进行调查.

点赞