R/print.goodnessfit.lba.ls.fe.R

In lba: Latent Budget Analysis for Compositional Data

Defines functions print.goodnessfit.lba.ls.fe

Documented in print.goodnessfit.lba.ls.fe

print.goodnessfit.lba.ls.fe <- function(x,
					digits=3L,
					...){

  cat("Residual sum of square:\n")

  res <- c(x$RSS1,
	   x$RSS)
  names(res) <- c("RSS baseline",
		  "RSS K budget")
  print.default(res,
		digits=digits,
		...)

  cat("\n")
}

Try the lba package in your browser