Add chromosomal positions plot

This commit is contained in:
Elias Projahn 2022-05-17 21:58:40 +02:00
parent 40164ebf84
commit 6a5e5ed9c6
3 changed files with 131 additions and 83 deletions

View file

@ -119,6 +119,13 @@ server <- function(input, output, session) {
geposan::plot_boxplot(ranking(), gene_sets)
})
output$positions_plot <- plotly::renderPlotly(
geposan::plot_scores_by_position(
ranking(),
input$positions_plot_chromosome_name
)
)
gost <- reactive({
withProgress(
message = "Querying g:Profiler",