Reintroduce mean expression as metric

This commit is contained in:
Elias Projahn 2022-06-06 15:56:34 +02:00
parent 0ee713a966
commit 882891da53
2 changed files with 17 additions and 2 deletions

13
R/ui.R
View file

@ -41,6 +41,17 @@ ui <- function() {
step = 0.01,
value = 0.5
),
sliderInput(
"mean_expression",
verticalLayout(
strong("Mean Expression"),
"Mean expression of the gene across all samples."
),
min = -1.0,
max = 1.0,
step = 0.01,
value = 0.25
),
sliderInput(
"sd_expression",
verticalLayout(
@ -50,7 +61,7 @@ ui <- function() {
min = -1.0,
max = 1.0,
step = 0.01,
value = -0.5
value = -0.25
)
),
mainPanel(