P-value correction: Difference between revisions
Content deleted Content added
Add Rust implementation |
→{{header|Wren}}: Now uses new core library method. |
||
Line 5,719: | Line 5,719: | ||
import "/fmt" for Fmt |
import "/fmt" for Fmt |
||
import "/seq" for Lst |
import "/seq" for Lst |
||
import "/math" for Nums |
import "/math" for Nums |
||
import "/sort" for Sort |
import "/sort" for Sort |
||
Line 5,797: | Line 5,797: | ||
} else if (type == "Bonferroni") { |
} else if (type == "Bonferroni") { |
||
return p.map { |v| |
return p.map { |v| (v * size).min(1) }.toList |
||
} else if (type == "Hochberg") { |
} else if (type == "Hochberg") { |
||
Line 5,832: | Line 5,832: | ||
} |
} |
||
for (i in 0...lower.count) { |
for (i in 0...lower.count) { |
||
q[lower[i]] = |
q[lower[i]] = qmin.min(s[lower[i]] * j) |
||
} |
} |
||
for (i in 0...upper.count) q[upper[i]] = q[size - j] |
for (i in 0...upper.count) q[upper[i]] = q[size - j] |