有没有一种方法可以选择子图/子集,其中聚类具有最大数量的顶点?
基本上我想做类似的事情:
want <- components(X)$csize < 20
我考虑过将集群ID从图形数据帧合并到节点df,然后使用计数或类似方法将原始df子集化,然后再次计算图形数据帧。
答案 0 :(得分:0)
这是使用随机图的潜在解决方案。您将需要使用groups
上的components
来确定哪些节点属于哪些组件,然后您需要使用{{1} }来确定组件的大小:
length
set.seed(4321)
g <- sample_gnm(100, 40, F, F)
plot(g, vertex.size = 5, vertex.label = '')
want <- g %>%
components %>%
groups %>%
.[sapply(., length) > 3]
将提供以下内容:
want
然后,您可以删除$`1`
[1] 1 34 38 45 75
$`3`
[1] 3 12 24 39 50 54 58 60 67 84 97 99 100
$`5`
[1] 5 35 37 41 44 53 65 90
want