R/summary.voronoi.R

In interp: Interpolation Methods

Defines functions summary.voronoi

Documented in summary.voronoi

summary.voronoi<-function(object,...)
{
  if(!inherits(object,"voronoi"))
    stop("object must be of class \"voronoi\"")
  ans<-list(nn=length(object$x),
            nd=length(object$dummy.x),
            call=object$call)
  class(ans)<-"summary.voronoi"
  ans
}

Try the interp package in your browser