R/summary.diagram.R

Defines functions summary.diagram

Documented in summary.diagram

summary.diagram <-
function(object, ...) {
  call <- attributes(object)[["call"]]
  n <- nrow(object)
  maxdimension <- attributes(object)[["maxdimension"]]
  scale <- attributes(object)[["scale"]]
  out <- list(call = call, n = n, maxdimension = maxdimension, scale = scale)
  class(out) <- c("summary.diagram")
  return(out)
}

Try the TDA package in your browser

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

TDA documentation built on March 30, 2021, 5:10 p.m.