Debounce custom gene selection

This commit is contained in:
Elias Projahn 2022-06-14 13:50:25 +02:00
parent add8a4bd76
commit 2e3521cbd9

View file

@ -28,7 +28,7 @@ server <- function(input, output, session) {
data data
}) })
custom_genes <- gene_selector_server("custom_genes") custom_genes <- gene_selector_server("custom_genes") |> debounce(500)
output$overview_plot <- plotly::renderPlotly(overview_plot( output$overview_plot <- plotly::renderPlotly(overview_plot(
ranked_data(), ranked_data(),