使用闪亮的数据表获取选定单元格的数据

Question

我在 Shiny 中有一个数据表，我需要从单元格中获取数据以显示正确的输出。

通过使用input$tableId_cells_selected，我能够检索表中所选单元格的位置。这很有帮助，但是我还需要参考单元格中的实际内容来编写输出函数。

我发现这个链接可能会有所帮助，但我无法应用该功能在我的 Shiny 服务器功能中实际工作。

任何帮助表示赞赏。

Answer 1

以下是为您提供的解决方案：

library(shiny)
library(DT)
shinyApp(
  ui = fluidPage(DT::dataTableOutput('tableId'),
                 textOutput("celltext")),
  server = function(input, output) {
    output$tableId = DT::renderDataTable(
      iris, , selection = list(target = 'cell')
    )

    output$celltext <- renderText({
      cell <- input$tableId_cells_selected
      iris <- iris[cell]
    })
  }
)

使用textOutput下面的数据表，您可以看到所选单元格的值...

您唯一需要做的就是使用input$tableId_cells_selected参数对数据进行子集化：

cell <- input$tableId_cells_selected
iris <- iris[cell]

下次请发布可重现的示例！