r - R闪亮的矩阵或表格输入

Question

我想创建一个矩阵或表格作为用户与 in 交互的输入Shiny。

例如：

sample name             number of tests
350292                  3
...                     ...

我想在mainPanel用户中自动生成选项卡以输入不同样本的数据。

这matrixInput在shinyIncubator包中是可能的，但该matrixInput函数不支持列名。

有一个更好的方法吗？

更新

我试过这个rhandsontable包。

代码：

library(shiny)
library(rhandsontable)

DF <- data.frame(name=c(350292, 360765), run=c(3,2))
colnames(DF) <- c("sample name", "number of tests")

ui <- fluidPage(
  headerPanel("test"),
  mainPanel(rHandsontableOutput("sample"))
)

server <- function(input, output) {
  output$sample <- renderRHandsontable({
    rhandsontable(DF, rowHeaders = NULL) %>%
     hot_col(c("sample name", "number of tests"), format = "0")
  })
}

shinyApp(ui = ui, server = server)

如何使用reactive()and调用值rhandsontable？

我想根据样品名称和测试编号创建选项卡。