Detect extreme weights at +/- k * IQR or by absolute percentile.

Detect extreme weights at +/- k * IQR or by absolute percentile.

Usage

morie_weights_detect_extreme(weights, k = 3)

Arguments

weights

Numeric vector of unit-level design weights.

k

Numeric multiplier for detect_extreme (Tukey MAD cut).

Value

A named list with elements n_extreme, threshold_lower, threshold_upper, extreme_indices, extreme_values, pct_extreme.

Examples

set.seed(1)
w <- c(runif(28, 0.5, 2), 25, 30)
str(morie_weights_detect_extreme(w), max.level = 1)
#> List of 6
#>  $ n_extreme      : int 2
#>  $ threshold_lower: num -1.39
#>  $ threshold_upper: num 3.96
#>  $ extreme_indices: int [1:2] 29 30
#>  $ extreme_values : num [1:2] 25 30
#>  $ pct_extreme    : num 6.67