# processing the random network 'randomREHsmall'
library(remify)
data(randomREHsmall)
reh <- remify(edgelist = randomREHsmall$edgelist,
model = "tie")
# printing a summary of the processed 'remify' object
print(reh)
Run the code above in your browser using DataLab