以下代码

library(igraph)
g <- make_ring(5)
set.seed(1)
cle <- cluster_leiden(g, resolution=1, objective_function=c("CPM", "modularity")[1])

modularity(g, membership(cle))
cle$quality

# print_all(g)    
# print.default(cle)

退货:

> modularity(g, membership(cle))
[1] -0.2
> cle$quality
[1] -0.5

问题: 什么是/在哪里可以在结果对象中找到值$Quality的含义. 不是模块化的问题.

推荐答案

正如https://stackoverflow.com/users/695132/szabolcs所指出的,目标函数等于:

 (1/2m) (ΣAij - Σ γ.ni.nj), whenever i and j are in the same community.

在本例中:

  • ni 计算结果为1,因为没有权重被分配给任何顶点.
  • M的计算结果为5条边.
  • Aij的值为零,因为所有社区都是没有self循环的单例.
  • γ的计算结果为1.
  • η γ.ni.nj判断为5.

给予(0-5)/10=-0.5.

R相关问答推荐

如果行和列名以相同的开头,将矩阵值设置为0

具有多个依赖变量/LHS的逻辑模型

更新合适的R mgcv::bam模型报告无效类型(关闭).'';错误

使用对管道内单元格的引用生成新变量

行式dppr中的变量列名

如何动态更新selectizeInput?

矩阵的堆叠条形图,条形图上有数字作为标签

条形图顶部与其错误条形图不对齐

为什么在BASE R中绘制线条时会看到线上的点?

如何在PDF格式的kableExtra表格中显示管道字符?

正则表达式在第二个管道和第二个T之后拆分R中的列

将摘要图添加到facet_WRAP gglot的末尾

向R中的数据帧添加一列,该列统计另一列中每个唯一值的二进制观测值的数量

对R中的列表列执行ROW Mean操作

R-找出存在其他变量的各种大小的所有组合

如何在R中创建这些列?

使用LAG和dplyr执行计算,以便按行和按组迭代

对计算变量所有唯一值的变量进行变异

修复标签重叠和ggploy内的空间

用LOOCV进行K近邻问题