Location : Home > Languages > Perl > Package Title : Statistics::Forecast |
![]() |
Statistics::Forecast - 予測値を計算
これは現在の値から将来の値を予測するオブジェクト指向モジュールである。新しい値は線形回帰を用いて計算する。
use Statistics::Forecast;
forecast オブジェクトを生成。
my $FCAST = new Statistics::Forecast("My Forecast Name");
データを追加。
$FCAST->{DataX} = \@Array_X; $FCAST->{DataY} = \@Array_Y; $FCAST->{NextX} = $NextX;
結果を計算。
$FCAST->calc;
結果を取得
my $Result_Forecast = $FCAST->{ForecastY);
予測式は以下のとおりである。
a+bx, ただし 'x' は予測された値であり、 _ _ a = y + bx b = sum((x+x)(y-y))/sum(x-x)**2
new
forecast 名称を受け取り、Statistics::Forecast オブジェクトとしてデータ構造を返す。
my $FCAST = new Statistics::Forecast("My Forecast");
calc
予測値を計算し返す。
$FCAST->calc;
dump
デバッグのためにデータを出力する。
$FCAST->dump;
SumX
X の値の和を返す。
my $SumOfX = $FCAST->{SumX};
SumY
Y の値の和を返す。
my $SumOfY = $FCAST->{SumY};
SumXX
X**2 の和を返す。
my $SumOfXX = $FCAST->{SumXX};
SumXY
X * Y の和を返す。
my $SumOfXY = $FCAST->{SumXY};
AvgX
X の値の平均を返す。
my $AvgX = $FCAST->{AvgX};
AvgY
Y の値の平均を返す。
my $AvgY = $FCAST->{AvgY};
N
X の値の数を返す。
my $N = $FCAST->{N};
use Statistics::Forecast; my @Y = (1,3,7,12); my @X = (1,2,3,4); my $FCAST = new Statistics::Forecast("My Forecast"); $FCAST->{DataX} = \@X; $FCAST->{DataY} = \@Y; $FCAST->{NextX} = 8; $FCAST->calc; print "The Forecast ", $FCAST->{ForecastName}; print " has the forecast value: ", $FCAST->{ForecastY}, "\n";
本モジュールは Alex Falcao (alexjfalcao@hotmail.com) http://webmaster.brfic.com によって開発された。
これは最初のバージョンで、予測値を計算する。
0.1
本モジュールは GPL ライセンスの下、自由なパブリックユースのためにリリースされている。
![]() |
Updated : 2006/07/25 |