下面的应用程序允许用户在表格中单击并选择单元格。是否有可能限制某些列被选择？例如，我希望用户只能在Species和Sepal.Length列中单击。
library(shiny)
library(DT)
ui <- fluidPage(
DTOutput("dt"),
verbatimTextOutput("txt")
)
server <- function(input, output, session) {
output$dt <- renderDT({
datatable(iris,
selection=list(mode="single", target="cell"))
})
output$txt <- renderText({
req(input$dt_cell_clicked)
input$dt_cell_clicked$value
})
}
shinyApp(ui, server)
1条答案
按热度按时间osh3o9ms1#
如果你和
然后使用
input$dt_cells_selected（clicked！= selected）来代替，它工作得很好。selectable中的矩阵是一个两列矩阵，包含所有可选择的单元格（行列对）。