Package 'hasseDiagram'

Drawing Hasse Diagram

Description

Drawing Hasse diagram - visualization of transitive reduction of a finite partially ordered set.

Details

Package:	hasseDiagram
Type:	Package
Version:	0.2.0
Date:	2021-06-10
License:	MIT

Author(s)

Krzysztof Ciomek

Maintainer: Krzysztof Ciomek <[email protected]>

See Also

hasse

---

Generate random data for hasse function

Description

This function generates random data for hasse function.

Usage

generateRandomData(nrNodes, minGraphs = 1, density = 0.5)

Arguments

nrNodes	Numer of nodes (0 < nrNodes).
minGraphs	Minimal number of graphs to generate (0 < minGraphs <= nrNodes).
density	Value which determines number of edges and shape of graphs (density in [0.0; 1.0]).

Value

nrNodes x nrNodes matrix.

Examples

data0_0 <- generateRandomData(15, 2, 0.0)
data0_5 <- generateRandomData(15, 2, 0.5)
data1_0 <- generateRandomData(15, 2, 1.0)

hasse(data0_0)
hasse(data0_5)
hasse(data1_0)

---

Draw Hasse diagram

Description

This function draws Hasse diagram – visualization of transitive reduction of a finite partially ordered set.

Usage

hasse(data, labels = c(), parameters = list())

Arguments

data	n x n matrix, which represents partial order of n elements in set. Each cell [i, j] has value TRUE iff i-th element precedes j-th element.
labels	Vector containing labels of elements. If missing or NULL then data row names will be used as labels. If rownames(data) are not present, the labels will be generated as ('a' + element index).
parameters	List with named elements: arrow – direction of arrows: "forward", "backward", "both" or "none" (default "forward"), cluster – whether to cluster elements which have the same parents and children and are connected all to all (see first commented example) (default TRUE), clusterMerge – merge clustered nodes within single node frame (default FALSE), clusterNonAdjacent – to allow clustering elements that are not mutually adjacent (default FALSE), edgeColor – edge color, from colors() (default "black"), newpage – whether to call grid.newpage() before drawing (default TRUE), nodeColor – node frame color, from colors() (default "black"), margin – node margins, a list with 4 numerical items: "tb" for top-bottom margin, "rl" for right-left margin, "otb" and "orl" for outer margin when multiple labels are present, shape – shape of diagram nodes: "roundrect", "rect" or "none" (default "roundrect"), transitiveReduction – whether to perform transitive reduction (default TRUE).

Examples

randomData <- generateRandomData(15, 2, 0.5)
hasse(randomData)

# Clustering example
data <- matrix(data = FALSE, ncol = 4, nrow = 4)
data[1, 2] = data[1, 3] = data[2, 4] = data[3, 4] = TRUE
data[2, 3] = data[3, 2] = TRUE
hasse(data, c(), list(cluster = TRUE))
hasse(data, c(), list(cluster = FALSE))

# Hasse to pdf example
# randomData <- generateRandomData(15, 2, 0.5)
# pdf("path-for-diagram.pdf")
# hasse(randomData, NULL, list(newpage = FALSE))
# dev.off()

---