powered by
Defined as pmin(x, quantile(x, 1 - length(x)^(-0.5)))
pmin(x, quantile(x, 1 - length(x)^(-0.5)))
redist_quantile_trunc(x)
the weights
numeric vector
# NOT RUN { redist_quantile_trunc(c(1,2,3,4)) # }
Run the code above in your browser using DataLab