未加权图的Graphlets计算
Graphlets calculation of unweighted graphs
我在 r 中使用 igraph 库。它提供了 graphlets 函数来计算 r 中图形的 graphlets。但它只适用于未加权的图。如果我想计算以下未加权图的小图怎么办?
library(igraph)
g2 <- graph.formula(A:B - A:C, X:Z - X:Y - X:B, C:Z , C:X )
g2
plot(g2)
然后如何找到未加权的图 g2 的小图和小图计数。
这是一个基于 ?graphlets
的示例:
library(igraph)
set.seed(1); par(mfrow=c(2,2))
g2 <- graph.formula(A:B - A:C, X:Z - X:Y - X:B, C:Z , C:X )
E(g2)$weight <- 1
lo <- layout.auto(g2)
gl2 <- graphlets(g2)
plot(g2, layout=lo)
for (i in 1:length(gl2$cliques)) {
V(g2)$color <- "white"
V(g2)[gl2$cliques[[i]]]$color <- "red"
plot(g2, layout=lo)
}
您可能需要查看 ?graphlets
中的示例以添加例如边权重。
我在 r 中使用 igraph 库。它提供了 graphlets 函数来计算 r 中图形的 graphlets。但它只适用于未加权的图。如果我想计算以下未加权图的小图怎么办?
library(igraph)
g2 <- graph.formula(A:B - A:C, X:Z - X:Y - X:B, C:Z , C:X )
g2
plot(g2)
然后如何找到未加权的图 g2 的小图和小图计数。
这是一个基于 ?graphlets
的示例:
library(igraph)
set.seed(1); par(mfrow=c(2,2))
g2 <- graph.formula(A:B - A:C, X:Z - X:Y - X:B, C:Z , C:X )
E(g2)$weight <- 1
lo <- layout.auto(g2)
gl2 <- graphlets(g2)
plot(g2, layout=lo)
for (i in 1:length(gl2$cliques)) {
V(g2)$color <- "white"
V(g2)[gl2$cliques[[i]]]$color <- "red"
plot(g2, layout=lo)
}
您可能需要查看 ?graphlets
中的示例以添加例如边权重。