d = k (trimmed mean - null) / s_w with k^2 the Winsorized variance of N(0, 1).
References
Wilcox, R. R. (2017). Modern Statistics for the Social and Behavioral Sciences, 2nd ed. Eq (8.6).
Examples
AkpD(c(2.1, 3.4, 1.9, 5.6, 4.4))$k
#> [1] 0.6419398
d = k (trimmed mean - null) / s_w with k^2 the Winsorized variance of N(0, 1).
Wilcox, R. R. (2017). Modern Statistics for the Social and Behavioral Sciences, 2nd ed. Eq (8.6).
AkpD(c(2.1, 3.4, 1.9, 5.6, 4.4))$k
#> [1] 0.6419398