Commit 62d302c5 authored by Bagueneau Mathias's avatar Bagueneau Mathias
Browse files

- Top genes limit to 10

parent 41531484
...@@ -441,7 +441,7 @@ server <- function(input, output, session) { ...@@ -441,7 +441,7 @@ server <- function(input, output, session) {
## Heatmap Generation & Output -------- ## Heatmap Generation & Output --------
output$heat_numb <- renderUI ({ output$heat_numb <- renderUI ({
sliderInput("top_number", label="Choose the number of top genes :", min=1, max=5, step=1, value=3) sliderInput("top_number", label="Choose the number of top genes :", min=1, max=10, step=1, value=3)
}) })
heatmapData <- reactive ({ heatmapData <- reactive ({
req(input$goheatmap) req(input$goheatmap)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment