Project a bipartite graph
A bipartite graph is projected into two one-mode networks
bipartite.projection.size(graph, types = NULL) bipartite.projection (graph, types = NULL, multiplicity = TRUE, probe1 = NULL)
- The input graph. It can be directed, but edge directions are ignored during the computation.
- An optional vertex type vector to use instead of the
vertex attribute. You must supply this argument if the graph has no
TRUE, then igraph keeps the multiplicity of the edges as an edge attribute. E.g. if there is an A-C-B and also an A-D-B triple in the bipartite graph (but no more X, such that A-X-B is also in the graph), then the multiplicity
- This argument can be used to specify the order of the projections in the resulting list. If given, then it is considered as a vertex id (or a symbolic vertex name); the projection containing this vertex will be the first one in the result list
Bipartite graphs have a
type vertex attribute in
igraph, this is boolean and
FALSE for the vertices of the first
TRUE for vertices of the second kind.
bipartite.projection.size calculates the number of vertices and
edges in the two projections of the bipartite graphs, without
calculating the projections themselves. This is useful to check how
much memory the projections would need if you have a large bipartite
bipartite.projections calculates the actual projections.
You can use the
probe1 argument to specify the order of the
projections in the result. By default vertex type
FALSE is the
TRUE is the second.
bipartite.projections keeps vertex attributes.
- A list of two undirected graphs. See details above.
- Bipartite graph
- Two-mode network
## Projection of a full bipartite graph is a full graph g <- graph.full.bipartite(10,5) proj <- bipartite.projection(g) graph.isomorphic(proj[], graph.full(10)) graph.isomorphic(proj[], graph.full(5)) ## The projection keeps the vertex attributes M <- matrix(0, nr=5, nc=3) rownames(M) <- c("Alice", "Bob", "Cecil", "Dan", "Ethel") colnames(M) <- c("Party", "Skiing", "Badminton") M <- sample(0:1, length(M), replace=TRUE) M g2 <- graph.incidence(M) g2$name <- "Event network" proj2 <- bipartite.projection(g2) print(proj2[], g=TRUE, e=TRUE) print(proj2[], g=TRUE, e=TRUE)