Location : Home > Languages > Perl > Package
Title : Math::Fibonacci::Phi
Toolbox Logo

名称

 Math::Fibonacci::Phi - 黄金比を計算


概要

use Math::Fibonacci::Phi;
use Math::Fibonacci::Phi qw(Phi phi);
use Math::Fibonacci::Phi ':all'

説明

エクスポート

 デフォルトではなし。以下の関数セクションで示すような方法でインポートできる。':all' で全関数をインポートできる。


関数

Phi($fn)

 所与のフィボナッチ数に対するPhi(黄金数;The Golden Number)を返す。引数がフィボナッチ数列の部分数列でなければ undef を返す。

phi($fn)

 所与のフィボナッチ数に対するphi(黄金数の逆数;antiPhi)を返す。引数がフィボナッチ数列の部分数列でなければ undef を返す。

series_Phi($n)

 それぞれのキーがフィボナッチ数と対応する Phi である、$n 項からなるフィボナッチ数列を返す。

series_phi($n)

 それぞれのキーがフィボナッチ数と対応する phi である、$n 項からなるフィボナッチ数列を返す。

term_Phi($nth)

 $nth 番目のフィボナッチ数に対応する Phi を返す。

term_phi($nth)

 $nth 番目のフィボナッチ数に対応する phi を返す。

super_series($n)

 それぞれのキーがフィボナッチ数と対応する Phi, phi, position である、$n 項からなるフィボナッチ数列を返す。
 'position' は数列内における位置を示す。(すなわち term_Phi() または term_phi() に対して与えるべき引数と同じ数)

フォーマットオプション

$Math::Fibonacci::Phi::Precision

 1から14桁の間で10進数の桁を指定する。

use Math::Fibonacci::Phi 'Phi';
print Phi(5), "\n";
$Math::Fibonacci::Phi::Precision = 7;
print Phi(5), "\n";

 結果は以下の通り:

1.66666666666667
1.6666667

$Math::Fibonacci::Phi::TrailingZeros

 $Math::Fibonacci::Phi::Precision が設定されれば、その数だけ 0 表示を保つ。

use Math::Fibonacci::Phi 'Phi';
$Math::Fibonacci::Phi::Precision = 5;
print Phi(3), "\n";
$Math::Fibonacci::Phi::TrailingZeros=1
print Phi(3), "\n";

 結果は以下の通り:

1.5
1.50000

参考資料

 Math::Fibonacci


著者

 Daniel Muey, http://drmuey.com/cpan_contact.pl


著作権とライセンス

 Copyright 2005 by Daniel Muey
 本ライブラリはフリーソフトウェアであり、Perl 本体と同等の条件で修正/再配布してよい。

Toolbox Logo
Updated : 2006/06/17