Math::Cephes::Matrix

Math::Cephes::Matrix is a Perl interface to the cephes matrix routines.
Download

Math::Cephes::Matrix Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Randy Kobes
  • Publisher web site:
  • http://search.cpan.org/~rkobes/

Math::Cephes::Matrix Tags


Math::Cephes::Matrix Description

Math::Cephes::Matrix is a Perl interface to the cephes matrix routines. Math::Cephes::Matrix is a Perl interface to the cephes matrix routines.SYNOPSIS use Math::Cephes::Matrix qw(mat); # 'mat' is a shortcut for Math::Cephes::Matrix->new my $M = mat(, , ]); my $C = mat(, , ]); my $D = $M->add($C); # D = M + C my $Dc = $D->coef; for (my $i=0; $inew($arr_ref);where $arr_ref is a reference to an array of arrays, as in the following example: $arr_ref = , , ]which represents / 1 2 -1 | 2 -3 1 | 1 0 3 /A copy of a Math::Cephes::Matrix object may be done as my $M_copy = $M->new();Methodscoef: get coefficients of the matrix SYNOPSIS: my $c = $M->coef; DESCRIPTION:This returns an reference to an array of arrays containing the coefficients of the matrix.clr: set all coefficients equal to a value. SYNOPSIS: $M->clr($n); DESCRIPTION:This sets all the coefficients of the matrix identically to $n. If $n is not given, a default of 0 is used.add: add two matrices SYNOPSIS: $P = $M->add($N); DESCRIPTION:This sets $P equal to $M + $N.sub: subtract two matrices SYNOPSIS: $P = $M->sub($N); DESCRIPTION:This sets $P equal to $M - $N.mul: multiply two matrices or a matrix and a vector SYNOPSIS: $P = $M->mul($N); DESCRIPTION:This sets $P equal to $M * $N. This method can handle matrix multiplication, when $N is a matrix, as well as matrix-vector multiplication, where $N is an array reference representing a column vector.div: divide two matrices SYNOPSIS: $P = $M->div($N); DESCRIPTION:This sets $P equal to $M * ($N)^(-1).inv: invert a matrix SYNOPSIS: $I = $M->inv(); DESCRIPTION:This sets $I equal to ($M)^(-1).transp: transpose a matrix SYNOPSIS: $T = $M->transp(); DESCRIPTION:This sets $T equal to the transpose of $M.simq: solve simultaneous equations SYNOPSIS: my $M = Math::Cephes::Matrix->new(, , ]); my $B = ; my $X = $M->simq($B); for (my $i=0; $inew(, , ]); my ($E, $EV1) = $S->eigens(); my $EV = $EV1->coef; for (my $i=0; $i->; } print "The eigenvector is @$vn"; }where $M is a Math::Cephes::Matrix object representing a real symmetric matrix. $E is an array reference containing the eigenvalues of $M, and $EV is a Math::Cephes::Matrix object representing the eigenvalues, the ith row corresponding to the ith eigenvalue. DESCRIPTION:If M is an N x N real symmetric matrix, and X is an N component column vector, the eigenvalue problem M X = lambda Xwill in general have N solutions, with X the eigenvectors and lambda the eigenvalues.Requirements:· Perl Requirements: · Perl


Math::Cephes::Matrix Related Software