# make a toy dataset
egomat <- matrix(c(0,1,1,1,0,0,1,0,0),3,3)
colnames(egomat) <- rownames(egomat) <- c("EGO", "1P", "1A")
index.egonet(egomat)
# an example with self defined index
my.outdegree <- function(dat) degree(dat,cmod="outdegree")[1]
index.egonet(egomat,index=c("effsize","constraint","outdegree","indegree","efficiency", "centralization", "gden", "ego.gden", my.outdegree=call("my.outdegree",dat=egomat)))
#Restricts the \code{outdegree} and \code{efficiency} to "EGO" and nodes with "P" in the name
index.egonet(egomat,index=c("outdegree","efficiency"),subset="P")
Run the code above in your browser using DataLab