Location : Home > Languages > Perl > Package Title : Algorithm::PageRank |
![]() |
Algorithm::PageRank - Perl で PageRank を計算
use Algorithm::PageRank; $pr = new Algorithm::PageRank; $pr->graph([ 0 => 1, 0 => 2, 1 => 0, 2 => 1, ] ); $pr->iterate(); $pr->iterate(50); $pr->result();
これはページランクアルゴリズム(PageRank algorithm)を実装したものである。バカでかいサイズのデータ(zilla-size of data)を扱うことを期待しないでほしい。
graph
グラフトポロジーを扱う。頂点は 0 から数える。
iterate
ページランクベクトルを計算する。パラメータは繰り返し回数の最大値。ベクトルが閾値に達するまでに収束しなければその最大値で計算を終了する。デフォルト値は 100 である。
またダンピングファクタ(dampening factor)を再設定することもできる($Algorithm::PageRank::d_factor)。デフォルト値は 0.05 である。
result
PDL オブジェクトフォーマットでページランクベクトルを返す。
Copyright (C) 2004 by Yung-chung Lin (a.k.a. xern), <xern@cpan.org>
本パッケージはフリーソフトウェアであり、 Perl 本体と同等の条件で修正/再配布してもよい。
【訳注と解説】
![]() |
Updated : 2006/06/28 |