# Load and build network
data(student_interactions)
head(student_interactions)
# Remove self-loops and build a network
el <- subset(student_interactions, from != to)
n_edges(as_cograph(el))
n_nodes(as_cograph(el))
Run the code above in your browser using DataLab