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 RaschSampler package in your browser

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

RaschSampler documentation built on May 29, 2017, 11:02 a.m.