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
})
custom_genes <- gene_selector_server("custom_genes")
custom_genes <- gene_selector_server("custom_genes") |> debounce(500)
output$overview_plot <- plotly::renderPlotly(overview_plot(
ranked_data(),