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