
zing
Novice
Oct 2, 2012, 10:42 AM
Post #1 of 2
(3945 views)
|
[SOLVED] Finding connected components in a graph.
|
Can't Post
|
|
I have two arrays having the connection information "from -->to" @a=a,b,d @b=c,c,e The following code finds the connected components based on the content of these two arrays.
my @a=qw(a b d); my @b=qw(c c e); my $g = Graph->new( undirected => 1 ); for (my $r = 0; $r <= 2; $r++) { $g->add_edge($a[$r], $b[$r]); } my @subgraphs = $g->connected_components; my $V = $g->vertices; print "\n$V\n"; print "----connected components------------"; use YAML; print Dump \@subgraphs; ------------OUTPUT----------------------
----connected components--------------- - - c - a - b - - e - d My question is how do I access only one of the connected components? I.e. either C-A-B or D-E
(This post was edited by zing on Oct 2, 2012, 1:56 PM)
|