# Simple example ------------------------------------------------------------
edgelist <- cbind(c(1,1,3,6),c(4,3,200,1))
edgelist
recoded_edgelist <- recode(edgelist)
recoded_edgelist
# Retrieving the "recode" attribute
attr(recoded_edgelist, "recode")
Run the code above in your browser using DataLab