powered by
zscores(y)
## The function is currently defined as zscores<-function(y) { qnorm( rank(y,na.last="keep",ties.method="average")/(1+sum(!is.na(y))) ) }
Run the code above in your browser using DataLab