The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Algorithm::HITS::Lite - HITS algorithm implementation not requiring PDL

SYNOPSIS

    my $ah = Algorithm::HITS::Lite->new(network => $adjm);
    my ($hub,$auth) = $ah->iterate(10);

APIs

new(network => $adjm)

The required parameter $adjm is the 'Adjency Matrix' presentation of network, must be a hashref of hashref.

iterate($k)

Iterate the process for $k timesm, default to 10 if it's not given. Return a ($hub,$auth) weight pair. Each is a hashref with keys are the same as keys in $adjm.

sqsum(@list)

Internally used, return Square Sum of all numbers in @list.

SEE ALSO

Algorithm::HITS, Algorithm::PageRank

COPYRIGHT

Copyright 2004 by Kang-min Liu <gugod@gugod.org>.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See <http://www.perl.com/perl/misc/Artistic.html>