แอตทริบิวต์ของเส้นเชื่อมและการกรองข้อมูล

library(igraph)

# View hours
hours

# Create new edge attribute called 'hours'
g <- set_edge_attr(g, ___, value = ___)

# View edge attributes of graph object
___(g)

# Find all edges that include "Britt"
E(g)[[.inc('___')]]  

# Find all pairs that spend 4 or more hours together per week
E(g)[[hours>=___]]