w_mean function

Calculate weighted statistics