我正在尝试使用 R (igraph
包)计算无向图中长度为 4 的无弦循环的数量。
这是我的 adyacency 矩阵('0' 和整数 > 1,因为它表示节点之间的共享对象的数量):
0 8 4 10 7 11 1
3 1 0 0 0 0 0
0 0 0 0 0 0 0
0 0 0 0 0 0 0
0 0 0 0 0 0 0
0 0 5 0 2 0 1
9 0 1 1 0 0 1
这是我的一段代码:
library(igraph)
A <- matrix(c(0L, 3L, 0L, 0L, 0L, 0L, 9L,
8L, 1L, 0L, 0L, 0L, 0L, 0L,
4L, 0L, 0L, 0L, 0L, 5L, 1L,
10L, 0L, 0L, 0L, 0L, 0L, 1L,
7L, 0L, 0L, 0L, 0L, 2L, 0L,
11L, 0L, 0L, 0L, 0L, 0L, 0L,
1L, 0L, 0L, 0L, 0L, 1L, 1L),
7, 7)
g <- graph.adjacency(A, mode = "undirected", diag=FALSE, weighted=TRUE)
对此的任何帮助将不胜感激!