gen.upset {parsec}

Antichain generating a given upset

Description

The function returns the antichain generating the input upset Q, given the incidence matrix z of the poset.

Usage

gen.upset(z, Q = 1)

Arguments

z

an incidence matrix.

Q

a vector (boolean, numeric indexing elements, or character with elements' names) identifying the input upset.

Value

A boolean vector.

See Also

gen.downset

Examples

lv <- c(2, 3, 2)
prof <- var2prof(varlen = lv)

z <- getzeta(prof)
up <- c("221", "131", "231", "222", "132", "232")
gen <- gen.upset(z, up)

plot(z, lwd = 1 + (rownames(prof$profiles)%in%up), col = 1 + gen,
sub = "bold = the upset, red = the antichain generating the upset")