Optimize ranking weights

This commit is contained in:
Elias Projahn 2021-10-07 11:31:45 +02:00
parent 0aa88119d2
commit d73908acab

6
ui.R
View file

@ -25,7 +25,7 @@ ui <- fluidPage(
min = 0, min = 0,
max = 100, max = 100,
step = 1, step = 1,
value = 100 value = 58
), ),
sliderInput( sliderInput(
"correlation", "correlation",
@ -34,7 +34,7 @@ ui <- fluidPage(
min = 0, min = 0,
max = 100, max = 100,
step = 1, step = 1,
value = 100 value = 36
), ),
sliderInput( sliderInput(
"neural", "neural",
@ -43,7 +43,7 @@ ui <- fluidPage(
min = 0, min = 0,
max = 100, max = 100,
step = 1, step = 1,
value = 100 value = 6
), ),
sliderInput( sliderInput(
"cutoff", "cutoff",