File: print.procrustes.R

package info (click to toggle)
r-cran-vegan 2.5-7%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites:
  • size: 5,564 kB
  • sloc: ansic: 2,275; fortran: 1,088; sh: 42; makefile: 2
file content (9 lines) | stat: -rw-r--r-- 238 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
"print.procrustes" <-
  function (x, digits = max(3, getOption("digits") - 3), ...) 
{
  cat("\nCall:\n")
  cat(deparse(x$call), "\n\n")
  cat("Procrustes sum of squares:\n")
  cat(formatC(x$ss, digits = digits), "\n\n")
  invisible(x)
}