johrpan/geposanui
1
0
Fork 0
mirror of https://github.com/johrpan/geposanui.git synced 2025-10-25 20:07:23 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Show confidence intervals for comparison

Browse source
This commit is contained in:
Elias Projahn 2022-06-03 17:56:14 +02:00
parent b026d8e079
commit 9960379645
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
R/server.R
View file

@ -142,9 +142,11 @@ server <- function(options) {
"<b>{num(comparison$mean_rank, 1)}</b>. ",
"This corresponds to a percent rank of ",
"<b>{num(100 * comparison$mean_percentile, 2)}%</b>. ",
"A Wilcoxon rank sum test with the hypothesis of higher ",
"than usual scores gives a p-value of ",
"<b>{num(comparison$p_value, 4)}</b>."
"A Wilcoxon rank sum test gives an estimated score difference ",
"between <b>{num(comparison$test_result$conf.int[1], 3)}</b> and ",
"<b>{num(comparison$test_result$conf.int[2], 3)}</b> with a 95% ",
"confidence. This corresponds to a p-value of ",
"<b>{num(comparison$test_result$p.value, 4)}</b>."
)
}