R/score.biprobit.R

score.biprobit <- function(x,indiv=FALSE,...) {
  if (indiv) { s <- x$score; attributes(s)$logLik <- NULL; return(s) }
  colSums(x$score)
}

Try the bptwin package in your browser

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

bptwin documentation built on May 2, 2019, 6:50 p.m.