R/summary.incidence.R

In parsec: PARtial orders in Socio-EConomics

Defines functions summary.incidence

Documented in summary.incidence

summary.incidence <-
function(object, ...) {
    number.of.elements <- nrow(object)
    number.of.comparability <- sum(object)*2 - number.of.elements
    list(number.of.elements=number.of.elements,
    number.of.comparability=number.of.comparability)
}

Try the parsec package in your browser