powered by
sienaNet(netarray, type = c("oneMode", "bipartite", "behavior"), nodeSet = "Actors", sparse = is.list(netarray))
sienaDataCreate
mynet1 <- sienaNet(array(c(s501,s502,s503),dim=c(50,50,3)))
Run the code above in your browser using DataLab