Weighted Hi-Median
Compute the weighted Hi-Median of x
.
wgt.himedian(x, weights = rep(1, n))
x |
numeric vector |
weights |
numeric vector of weights; of the same length as |
median
;
also wtd.quantile
from package Hmisc.
x <- c(1:6, 20) median(x) ## 4 stopifnot(all.equal(4, wgt.himedian(x)), all.equal(6, wgt.himedian(x, c(rep(1,6), 5))))
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.