Question

我编写了一个R宏，它将数据集转换为更易读的格式。它是完整的并且已经在几个数据集上进行了测试，所以我现在决定使用Shiny编写一个GUI来实现这个代码。

我的UI代码似乎正在运行。

shinyUI(fluidPage(
  titlePanel("DATASET CONVERSION"),

  sidebarLayout(
      fileInput("filein", label = h2("Select a file to convert.")),
      submitButton("Submit")
                 ),
    mainPanel(
      tableOutput("Dataset")
      )
  )
)

然而，服务器似乎没有在主面板中产生任何输出

source("Full Code.R")
shinyServer(function(input, output) {

  input$filein

  output$Dataset <- renderTable({ 
    OUTPUT
  })
})

我的源代码（完整代码.R）已经过测试并且完全正常运行。它需要一个名为INPUT的输入数据集，并在代码之后，将转换后的数据集分配给名称为OUTPUT的全局环境。由于机密性原因，我无法透露数据集，但这是一个任意数据集可以显示的任意问题。

如果有人发现我所犯的任何错误，请告诉我。

Answer 1

当您的闪亮应用程序正在运行时，闪亮的需要更新服务器部分，这就是为什么您将输入$ filein放入反应函数中，您将用于输出：

shinyServer（函数（输入，输出）{

outputdf <-  reactive({ input$filein   
})    
output$Dataset <- renderTable({ 
  outputdf()
})

}

反应性信息：

http://shiny.rstudio.com/tutorial/lesson6/

显示来自源函数的表输出

1 个答案: