#Create a graph....
g<-rgraph(5)
g
#Transpose it
gt(g)
gt(g)==t(g) #For adjacency matrices, same as t(g)
#Now, see both versions in edgelist form
as.edgelist.sna(g)
gt(g,return.as.edgelist=TRUE)
Run the code above in your browser using DataLab