R/antisymmetry.R
In parsec: PARtial orders in Socio-EConomics

antisymmetry <-
function(m) {
    r <- nrow(m)
    c <- ncol(m)
    if(r!=c) return(FALSE)
    all((m+t(m) - diag(diag(m))) <= 1)
}

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

parsec documentation built on May 2, 2019, 6:08 p.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the parsec package in your browser