Enhance scatter plot

This commit is contained in:
Elias Projahn 2021-08-26 12:50:03 +02:00
parent 1c43433600
commit 363dee2cbd
2 changed files with 58 additions and 26 deletions

View file

@ -37,6 +37,6 @@ server <- function(input, output) {
output$scatter <- renderPlot({
gene_ids <- filtered()[input$genes_rows_selected, gene]
scatter_plot(gene_ids, data)
scatter_plot(gene_ids, data, results)
})
}