R/print.spacious.R

In jarad/spacious: Block composite spatial analysis.

# print the summary
"print.spacious" <- function(x, ...) {
	print(summary(x))
	cat("Convergence:", x$conv,"\n")
	cat("Iterations:", x$nIter,"\n")
	cat("Log Likelihood:", x$ll,"\n")
}