# NOT RUN {
# get fluency data
data(animal_fluency)
# edge list of fluency graph
edge_list = threshold_graph(animal_fluency[1:10])
# get adjacency matrix
adj = edg_to_adj(edge_list)
# get largest component
l_comp(adj)
# }
Run the code above in your browser using DataLab