# diagram: Plot the Hasse Diagram of a set of ordered relations In multiplex: Algebraic Tools for the Analysis of Multiple Social Networks

## Description

A function to plot the Hasse Diagram of partially ordered relations.

## Usage

 ```1 2``` ```diagram(x, unord = TRUE, attrs = NULL, main = NULL, cex.main, bg, mar, shape, tcex, col, col0, tcol, ecol, lty, lbs, ...) ```

## Arguments

 `x` a matrix representing ordered relations `unord` (logical) whether or not the elements not belonging in the order should be included in the diagram `attrs` (optional) attributes of the diagram `main` (optional) title of the diagram `cex.main` (optional) size of the diagram's title `bg` (optional) the background color of the diagram `mar` (optional) the margins of the plot `shape` (optional) the shape of the vertices `tcex` (optional) the size of the vertex labels `col` (optional) the color of the vertices `col0` (optional) the color of the vertices' contour `tcol` (optional) the color of the text's vertices `ecol` (optional) the color of the edges `lty` (optional) the shape of the edges `lbs` (optional) labels of the elements in the partially ordered set `...` (optional) other graphical items

## Details

An example of ordered relations is found in the partial order table of relations, which is product of the '`strings`' option in the `partial.order` function. Another set of ordered relations comes from the table produced on Galois derivations in the mentioned function.

In either case this function plot either the partial order or a linear order diagram, depending on the results as Hasse diagrams.

## Value

A Hasse diagram of the partial order relation.

## Warning

This function requires that the Rgraphviz package is available.

## Note

Note that if the elements of the partial order are not labelled, Roman numerals will be given to each element.

## Author(s)

Antonio Rivero Ostoic

`partial.order`, `as.strings`, `strings`, `diagram.levels`, `galois`.
 ``` 1 2 3 4 5 6 7 8 9 10 11 12``` ```## load the data data("incubA") ## given e.g. a partial order table in the object 'po' po <- partial.order(as.strings(incubA\$IM), type="strings") ## plot the order relation as a Hasse diagram. ## Not run: if(require(Rgraphviz)) { plot(diagram(po)) } ## End(Not run) ```