reactable
光沢のあるアプリでテーブルを作成するために使用しています。検索バーを追加しましたが、テーブルのメイン行でしか機能しません。展開可能な行がある場合、機能しません。展開可能な行でも値を検索したい。たとえば、「Front」という単語を検索する場合、ネストされた/展開可能な行に含まれる行をフィルタリングする必要があります。私の短くて実行可能な例を見てください:
if (interactive()) {
library(shiny)
library(reactable)
data <- MASS::Cars93[, 1:5]
dataDetails <- MASS::Cars93[, c(1,6,9,10)]
MASS::Cars93
ui <- fluidPage(
reactableOutput("table")
)
server <- function(input, output) {
output$table <- renderReactable({
reactable(
data,
searchable = TRUE,
selection = "multiple",
details = function(index){
extraData <- subset(dataDetails, data[[1]] == dataDetails[[1]][index])
htmltools::div(style = "padding: 16px",
reactable::reactable(extraData, outlined = TRUE))
}
)
})
}
shinyApp(ui, server)
}
私はjsを試しました(検索バーのキーアップイベントで行を自動的に展開し、展開された行を検索します)が、うまくいきませんでした。実際、それは非常に遅い解決策でした。