原文链接：http://tecdat.cn/?p=24886 

原文出处：拓端数据部落公众号

在网络上进行社区检测时，有时我们不仅拥有实体之间的联系。这些实体代表了我们可能也想在网络可视化中代表的现实事物。

1.    
2.   plot(g)
3.    

我使用数据集，代表了观察到的 18 位女性参加 14 场社交活动的情况。

不考虑这个图是二向图，让我们尝试将图划分为社区。有自然的分界线吗？让我们根据节点所属的社区为节点着色：

1.   community(g)
2.   col <- membership + 1
3.   plot

正如我们所看到的，该算法找到了2个社区，乍一看，这种划分似乎是合理的。无论如何，还有一种自然的划分是算法无法找到的：事件/女性的二元关系。每个节点都有这样的属性："是女性 "或 "是事件"。让我们用不同的方式来描述这个图的特征。我们有14个事件。对于这些，我们改变它们的形状。 

1.   shape <- "squa"
2.   shape <- "cice"
3.   plot(g)

如何从给定的网络中提取社区？

在网络中寻找社区是复杂系统范式下的一项常见任务。有几种方法可以使用非常不同的包对图进行社区分区。

网络社区检测算法

walktrap.community

该算法通过执行随机游走找到密集连接的子图。这个想法是随机游走将倾向于留在社区内，而不是跳到其他社区。

边缘.中间.社区

这个算法就是Girvan-Newman算法。它是一种分割算法，在每一步中，具有最高间性的边被从图中移除。对于每一次划分，你都可以计算出图的模块化程度。最后，在这个过程给你带来最高模块化值的地方选择切割树状图。

Newman快速算法(fast greedy)

该算法是纽曼算法。在这种情况下，算法是凝聚的。在每一步，两组合并。合并是通过优化模块化决定的。这是一种快速算法，但有一个贪婪算法的缺点。因此，虽然我发现它有用且准确，但它可能不会产生最佳的整体社区划分。

自旋玻璃社群发现

该算法使用自旋玻璃模型和模拟退火来查找网络内的社区。

1.    
2.   # 首先我们加载ipgrah软件包
3.    
4.    
5.   # 让我们生成两个网络并将其合并为一个图。
6.   graph.union
7.    
8.   # 让我们删除多线和循环
9.   simplify
10.    
11.   # 让我们用Grivan-Newman算法看看这里是否有社区。
12.   # Grivan-Newman算法
13.   # 首先，我们计算边缘间性、合并等。
14.   edge.betweenness.community
15.    
16.   # 现在我们有了合并/拆分，我们需要计算模块化。
17.   # 对于每个合并，我们将使用一个函数，对于每个边被删除，将创建第二个图，检查其成员资格并使用该成员资格来计算模块化程度
18.   membership
19.   # -在原图g上计算模块化
20.   modularit
21.    
22.   # 我们现在可以绘制所有模块化的图
23.   plot
24.    
25.   # 现在，让我们根据节点的成员资格为其着色
26.   removed.edges
27.   color=membership
28.    
29.   # 让我们为图选择一个布局
30.   layout
31.    
32.   # 绘制
33.   plot
34.    
35.   # 使用 fastgreedy.community算法
36.    
37.   plot
38.    

---

最受欢迎的见解

1.采用spss-modeler的web复杂网络对所有腧穴进行分析

2.用R语言和python进行社交网络中的社区检测

3.R语言文本挖掘NASA数据网络分析，tf-idf和主题建模

4.在R语言中使用航空公司复杂网络对疫情进行建模

5.python隶属关系图模型 基于模型的网络中密集重叠社区检测

6.使用Python和SAS Viya分析社交网络

7.关联网络分析：已迁离北京外来人口的数据画像

8.情感语义网络：游记数据感知旅游目的地形象

9.用关联规则数据挖掘探索药物配伍中的规律