powered by
WeightedStdz(x, weights = NULL)
x
x <- sample(10,10) w <- sample(5,10, replace=TRUE) WeightedStdz(x, w)
Run the code above in your browser using DataLab