equivalences {parsec}

Equivalence classes in a poset.

Description

The function computes the set of poset elements sharing the same upset and downset.

Usage

equivalences(x)

Arguments

x

an object of class incidence or cover.

Value

The function computes a vector assigning an equivalence class to each profile. The vector is of class factor.

Author(s)

Arcagni A.

Examples

Lmbd <- getlambda(A > B, A > C, B > D, A > E, B > E, C > F, C > G)
res <- equivalences(Lmbd)

equivalence_classes <- levels(res)
colrs <- sapply(res, function(x) which(equivalence_classes == x)) + 1
plot(Lmbd, col = colrs, lwd = 2)