以闪亮的方式显示源函数的表输出答案

【问题标题】：Displaying table output from a source function in shiny以闪亮的方式显示源函数的表输出
【发布时间】：2015-06-06 00:06:20
【问题描述】：

我编写了一个 R 宏，它可以将数据集转换为更清晰的格式。它已经完成并且已经在多个数据集上进行了测试，所以我现在决定编写一个 GUI 来使用 Shiny 实现此代码。

我的 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
  })
})

我的源代码 (Full Code.R) 已经过测试并且可以完全运行。它需要一个名为 INPUT 的输入数据集，并按照代码将转换后的数据集分配给名为 OUTPUT 的全局环境。由于保密原因，我无法透露数据集，但这是一个可以显示任何数据集的任意问题。

如果有人能发现我一直在犯的任何错误，请告诉我。

【问题讨论】：

标签： r user-interface dataset shiny

【解决方案1】：

当您的闪亮应用程序正在运行时，闪亮需要更新服务器部分，这就是您将 input$filein 放在反应函数中的原因，您将使用它来输出：

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

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

}

反应性信息：

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

【讨论】：