เป็นไปได้หรือไม่ที่จะแยกหรือแก้ไขโมดูลที่กำลังพล็อตเพื่อให้โมดูลที่มีโหนดเดียวไม่มีขอบเขตของโมดูล ในกรณีด้านล่าง ให้ซ่อนขอบเขตของโมดูลประมาณ 9 และ 13
set.seed(3)
g <- barabasi.game(20, m=2, directed=FALSE)
eb <- cluster_edge_betweenness(g)
plot(eb, g, layout=layout_with_fr)
คุณสามารถทำสิ่งนี้ได้โดยใช้อาร์กิวเมนต์ mark.groups ไปที่ plot.communities ขั้นแรกให้สร้างการจัดกลุ่มเริ่มต้น จากนั้นจึงลบกลุ่มที่มีสมาชิกเพียงคนเดียวออก
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)
