Apakah mungkin untuk mengecualikan atau mengedit modul yang sedang diplot sehingga modul dengan hanya satu node tidak memiliki batas modul? Dalam kasus di bawah ini, sembunyikan batas modul di sekitar 9 dan 13.
set.seed(3)
g <- barabasi.game(20, m=2, directed=FALSE)
eb <- cluster_edge_betweenness(g)
plot(eb, g, layout=layout_with_fr)
Anda bisa melakukannya menggunakan argumen mark.groups hingga plot.communities. Pertama buat pengelompokan default, tapi kemudian hilangkan grup yang hanya memiliki satu anggota.
MG = lapply(unique(eb$membership), function(m) { which(eb$membership == m) })
MG[sapply(MG, length) == 1] = NULL
plot(eb, g, mark.groups=MG, layout=layout_with_fr)
