R/getpval.R

#' @importFrom stats pf
getpval <- 
function(model)
{
  summ <- summary(model)$fstatistic
  return(1-pf(summ[1], summ[2], summ[3]))
}
behuang/mpMap documentation built on May 12, 2019, 10:53 a.m.