edgelist <- matrix(c(1, 2, 2, 3, 3, 1), ncol = 2, byrow = TRUE)
edgeweight <- c(1, 2, 3)
nodegroup <- c(1, 1, 2)
netwk <- edgelist_to_wdnet(
edgelist = edgelist,
edgeweight = edgeweight,
directed = TRUE,
nodegroup = nodegroup
)
Run the code above in your browser using DataLab