Я немного запутался, я извлек гигантский компонент несвязного графа, используя следующий код.
function(graph) {
cl <- clusters(graph)
induced.subgraph(graph, which(cl$membership == which.max(cl$csize)))
}
Но выполнение такого кода в RStudio приводит к частым ошибкам, таким как
is_connected(ngo.giant)
[1] TRUE
centr_clo(ngo.giant)$centralization
[1] 0.003214897
Warning message:
In centr_clo(ngo.giant) :
At centrality.c:2784 :closeness centrality is not well-defined for disconnected graphs
temp<-centr_eigen(ngo.giant,directed=T)
Warning message:
In centr_eigen(ngo.giant, directed = T) :
At centrality.c:344 :graph is directed and acyclic; eigenvector centralities will be zeros
Есть ли причина, по которой это происходит? Извините, если этот код слишком расплывчатый