Convenient plotting aesthetics for affiliation networks

Given an affiliation network, assign the node and link aesthetics to values that produce a neater visualization through plot.igraph than the igraph defaults.

prettify_an(graph)

prettify.an(graph)

Arguments

graph	An affiliation network.

Examples

library(igraph)
data(women_clique)
data(whigs)
for (g in list(women_clique, whigs)) {
    plot(prettify_an(g))
}