R/borrowed.R

Defines functions qr.lmm

Documented in qr.lmm

##
## This file contains ORIGINAL COPIES of methods from the base package stats (2014-10-31)
## and the extension packages car (2014-10-10) and multcomp (2013-10-04).
##



## Function copied from package stats to make anova.lm work.
## using qr(<lmm>)  as interface to  <lmm>$qr :
qr.lmm <- function(x, ...) {
  if(is.null(r <- x$qr))
    stop("lm object does not have a proper 'qr' component.
 Rank zero or should not have used lm(.., qr=FALSE).")
  r
}

Try the mixlm package in your browser

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

mixlm documentation built on Aug. 8, 2023, 5:08 p.m.