R/print.graphlist.R

In fanovaGraph: Building Kriging Models from FANOVA Graphs

Defines functions print.graphlist

Documented in print.graphlist

print.graphlist <- function(x,...){
  cat("Overall variance\n")
  print(x$V)
  cat("\nCliques\n")
  cl <- x$cliques
  for (i in 1:length(cl)) cat(paste(paste(cl[[i]], collapse=""),"\n"))
  cat("\nScaled total interaction indices\n")
  print(x$tii.scaled)
  }

Try the fanovaGraph package in your browser