DEBSOURCES
Skip Quicknav
sources / r-cran-erm / 1.0-6-1 / R / phi.range.R
123456789
"phi.range" <- function(mat){ cmat<-cor(mat)+diag(NA,ncol(mat)) ma<-max(cmat,na.rm=TRUE) mi<-min(cmat,na.rm=TRUE) RET <- ma-mi RET }