Add new clusteriness score

This commit is contained in:
Elias Projahn 2021-09-30 12:54:40 +02:00
parent ba7c624705
commit 91c15045cf
5 changed files with 43 additions and 67 deletions

25
ui.R
View file

@ -11,36 +11,21 @@ ui <- fluidPage(
"species",
"Species to include",
choices = list(
"All qualified" = "all",
"Replicatively aging" = "replicative"
"Replicatively aging" = "replicative",
"All qualified" = "all"
)
),
sliderInput(
"range",
"Gene position (Mbp)",
min = 0,
max = 50,
value = c(0, 15),
step = 0.1
),
sliderInput(
"length",
"Minimum cluster size",
min = 0,
max = 30,
value = 10
)
),
wellPanel(
h3("Ranking"),
sliderInput(
"clustering",
"Size of largest cluster",
"clusteriness",
"Clustering of genes",
post = "%",
min = 0,
max = 100,
step = 1,
value = 100
value = 50
),
sliderInput(
"correlation",