I have written this code
library("igraph") dataset = read.graph(file="dolphins.gml", format="gml") set.seed(6) wcss = vector() f