R/summary.influenceSSN.R

In SSN: Spatial Modeling on Stream Networks

Defines functions print.influenceSSN summary.influenceSSN

summary.influenceSSN <- function(object, ...)
{
    print(object)
}


print.influenceSSN <- function(x, ...)
{
    cat("Object of class influenceSSN\n\n")

    data <- getSSNdata.frame(x$ssn.object)
    data <- data[,"_resid_"]

    summary(data)
}

Try the SSN package in your browser