R/nobs.R

Defines functions nobs.semtree

#' @exportS3Method nobs semtree
nobs.semtree <- function(object, ...) {
  if (!inherits(object, "semtree"))
    return(NULL)
  object$N
} 
brandmaier/semtree documentation built on April 18, 2024, 3:24 a.m.