P-value correction: Difference between revisions

Content deleted Content added
Add Rust implementation
PureFox (talk | contribs)
→‎{{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, Math
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| Math.min(v * size, 1) }.toList
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]] = Math.min(s[lower[i]] * j, qmin)
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]