|
Location : Home > Languages > Perl > Package Title : Math::Approx::Symbolic |
![]() |
Math::Approx::Symbolic - 補間された多項式の記号表現
use Math::Approx::Symbolic; # ... Math::Approx を利用するように... my $symbolic = $approximation->symbolic(); # ... Math::Symbolic オブジェクトである。
本モジュールは Math::Approx モジュール関連の小機能のラッパである。Math::Approx のサブクラスであり、a計算された近似値を表す Math::Symbolic オブジェクトを返すサブルーティンを追加する。
EXPORT
今のところなし。
symbolic() method
これが唯一 Math::Approx に追加されたメソッド。近似多項式の記号表現に用いる変数名を引数(ただしオプション)としてとる。
近似多項式を表す Math::Symbolic オブジェクトを返す。
use Math::Approx::Symbolic;
sub poly {
my($n,$x) = @_;
return $x ** $n;
}
my %x;
for (1..20) {
$x{$_} = sin($_/10) * cos($_/30) + 0.3*rand;
}
my $approx = new Math::Approx::Symbolic (\&poly, 5, %x);
$approx->print;
print "Fit: ", $approx->fit, "\n\n";
my $function = $approx->symbolic('x');
# 引数がなければデフォルトとして変数 'x' を用いる。
print "$function\n";
print $function->value(x => $_),"\n" foreach keys %x;
# 記号の関数のとして動作する。
(c) 2003 by Steffen Muler,
著者に対するフィードバック・バグ報告・サポートの要望は approx-symbolic-module at steffen-mueller dot net まで。
本ライブラリはフリーソフトウェアであり、Perl 本体と同等の条件で修正/再配布してもよい。
本モジュールの新バージョンは http://steffen-mueller.net または CPAN で入手可能である。
![]() |
Updated : 2006/06/15 |