Compute Winsorized Mean and its Standard Error for ggplot2

Compute 20% winsorized mean and standard error for a given vector. Can be used as fun.data in ggplot2's stat_summary.

Usage

win_mean_se(x)

Arguments

x

A numeric vector.

Value

A tibble with columns ymin, mean, and ymax.

Examples

x <- rnorm(200)

win_mean_se(x)
#>            y        ymin     ymax
#> 1 0.06097013 -0.01018372 0.132124