R/phi.range.R

"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
}

Try the eRm package in your browser

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

eRm documentation built on May 29, 2024, 2:12 a.m.