我想基于两列生成索引以对观察进行分组.但是我希望小组能够通过观察来共享,至少有一个公共观察.我可以看到如何根据共同观察的观察结果制作小组,而不仅仅是其中一个.
例如,使用数据框:
dt <- data.frame(id=1:10,
G1 = c("A","A","B","B","C","C","C","D","E","F"),
G2 = c("Z","X","X","Y","W","V","U","s","T","T"))
Run Code Online (Sandbox Code Playgroud)
我想得到一个专栏
1,1,1,1,2,2,2,3,4,4
Run Code Online (Sandbox Code Playgroud)
我尝试使用dplyr中的group_indices,但还没有管理它.
我应该找到集群中节点的弱集群和成员资格,以及集群中强节点和节点成员资格.
我的代码:
library(igraph)
g <- erdos.renyi.game(8, 15/100)
is.connected(g, mode=("strong"))
clusters(g, mode="strong")
no.clusters(g, mode="strong")
cluster.distribution(g, cumulative = FALSE, mul.size = FALSE)
Run Code Online (Sandbox Code Playgroud)
作为解决方案,我得到了:
> library(igraph)
> g <- erdos.renyi.game(8, 15/100)
> is.connected(g, mode=("strong"))
[1] FALSE
> clusters(g, mode="strong")
$membership
[1] 1 2 1 1 3 1 4 1
$csize
[1] 5 1 1 1
$no
[1] 4
> no.clusters(g, mode="strong")
[1] 4
> cluster.distribution(g, cumulative = FALSE, mul.size = FALSE)
[1] 0.00 0.75 0.00 0.00 0.00 0.25
Run Code Online (Sandbox Code Playgroud)
但我没有得到哪些是我强大的星团,我怎么能用不同的颜色绘制我强壮的星团呢?R studio是否有任何好的教程,因为R studio没有多少资源?