Function to create a node set
Creates a Siena node set which can be used as the nodes in a siena network.
sienaNodeSet(n, nodeSetName="Actors", names=NULL)
| n | integer, size of set. | 
| nodeSetName | character string naming the node set. | 
| names | optional character string vector of length n of the names of the nodes. | 
This function is important for data sets having more than one node set, but not otherwise.
Returns a Siena node set, an integer vector, possibly with names, plus the attributes, class equal to "sienaNodeSet", and nodeSetName equal to the argument nodeSetName.
Ruth Ripley
senders <- sienaNodeSet(50, nodeSetName="senders")
receivers <- sienaNodeSet(30, nodeSetName="receivers")
senders.attribute <- coCovar(rep(1:10, each=5), nodeSet="senders")
receivers.attribute <- coCovar(rep(1:5, each=6), nodeSet="receivers")
mynet <- sienaDependent(array(c(s501[,1:30], s502[,1:30]), dim=c(50, 30, 2)),
      nodeSet=c("senders", "receivers"))
(mydata <- sienaDataCreate(mynet, senders.attribute, receivers.attribute,
      nodeSets=list(senders, receivers)))Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.