johrpan/ubigen
1
0
Fork 0
mirror of https://github.com/johrpan/ubigen.git synced 2025-10-26 19:57:24 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add custom genes details table

Browse source
This commit is contained in:
Elias Projahn 2022-06-22 12:39:26 +02:00
parent 989655307b
commit 27f66d7f35
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
R/server.R
View file

@ -76,6 +76,10 @@ server <- function(input, output, session) {
box_plot(ranked_data(), custom_genes())
)
output$custom_genes_details <- DT::renderDT({
genes_table(ranked_data()[gene %chin% custom_genes()])
})
output$scores_plot <- plotly::renderPlotly(scores_plot(
ranked_data(),
highlighted_genes = custom_genes()