R/summary.activeset.R

Defines functions summary.activeset

Documented in summary.activeset

summary.activeset <- function(object, ...)
{
  cat("\nCall:\n")
  print(object$call)
  cat("\nLoss value:", object$fval, "\n")
  cat("Number of iterations: ", object$niter, "\n")

  cat("\nLangrange Multipliers:\n")
  print(round(object$lambda, 3))
  
  if (!is.null(object$isocheck))
  {
    cat("\nKKT feasibility check:\n")
    chdf <- as.data.frame(unlist(object$isocheck))
    colnames(chdf) <- c("Value")
    print(round(chdf, 3))
  }
  cat("\n")
}

Try the isotone package in your browser

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

isotone documentation built on May 2, 2019, 4:41 p.m.