R/w.skewness.R

w.skewness <-
function(x, mu)  ( sum( mu*(x-w.mean(x,mu))^3 ) / sum(mu) ) / w.sd(x,mu)^3

Try the Weighted.Desc.Stat package in your browser

Any scripts or data that you put into this service are public.

Weighted.Desc.Stat documentation built on May 1, 2019, 7:06 p.m.