mirror of
https://github.com/johrpan/ubigen.git
synced 2025-10-26 11:47:24 +01:00
Use two-sided Wilcoxon test
This commit is contained in:
parent
995b31646e
commit
26a209aade
1 changed files with 1 additions and 2 deletions
|
|
@ -66,7 +66,6 @@ server <- function(custom_dataset = NULL) {
|
|||
test_result <- stats::wilcox.test(
|
||||
x = comparison,
|
||||
y = reference,
|
||||
alternative = "greater",
|
||||
conf.int = TRUE
|
||||
)
|
||||
|
||||
|
|
@ -81,7 +80,7 @@ server <- function(custom_dataset = NULL) {
|
|||
|
||||
HTML(glue::glue(
|
||||
"The p-value with the alternative hypothesis that your genes have ",
|
||||
"higher scores than other genes is <b>{p_value}</b>. This value ",
|
||||
"different scores than other genes is <b>{p_value}</b>. This value ",
|
||||
"was computed using a Wilcoxon rank sum test. Based on a 95% ",
|
||||
"confidence, the difference in scores is between <b>{lower}</b> and ",
|
||||
"<b>{upper}</b>. The median score of your genes is ",
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue