version 1.1.1.1, 1999/11/27 11:25:18 |
version 1.3, 2000/01/03 09:15:53 |
|
|
@c $OpenXM: OpenXM/src/asir99/lib/contrib/packages/doc/Matrix.texi,v 1.2 1999/11/21 10:58:55 okutani Exp $ |
@c $OpenXM$ |
@node Matrix operations,,, $B$=$NB>$NH!?t(B |
@node Matrix operations,,, $B$=$NB>$NH!?t(B |
@section Matrix operations |
@section Matrix operations |
$B%U%!%$%k(B @file{gr} $B$,I,MW$G$9(B. |
$B%U%!%$%k(B @file{gr} $B$,I,MW$G$9(B. |
@menu |
@menu |
* mat_1:: |
* matrix_1:: |
* mat_diag:: |
* matrix_diag:: |
* mat_trans:: |
* matrix_trans:: |
* mat_inverse:: |
* matrix_inverse:: |
* mat_solve:: |
* matrix_solve:: |
* mat_kernel:: |
* matrix_kernel:: |
@end menu |
@end menu |
|
|
@node mat_1,,, Matrix operations |
@node matrix_1,,, Matrix operations |
@subsection @code{mat_1} |
@subsection @code{matrix_1} |
@findex mat_1 |
@findex matrix_1 |
@table @t |
@table @t |
@item mat_1(@var{N}) |
@item matrix_1(@var{N}) |
:: @var{N} $B<!C10L9TNs$r@8@.$7$^$9(B. |
:: @var{N} $B<!C10L9TNs$r@8@.$7$^$9(B. |
@end table |
@end table |
@table @var |
@table @var |
|
|
$B@0?t(B |
$B@0?t(B |
@end table |
@end table |
@itemize @bullet |
@itemize @bullet |
@item @code{mat_1}$B$NNc(B. |
@item @code{matrix_1}$B$NNc(B. |
@end itemize |
@end itemize |
@example |
@example |
[297] mat_1(1); |
[297] matrix_1(1); |
[ 1 ] |
[ 1 ] |
|
|
[298] mat_1(2); |
[298] matrix_1(2); |
[ 1 0 ] |
[ 1 0 ] |
[ 0 1 ] |
[ 0 1 ] |
|
|
[299] mat_1(3); |
[299] matrix_1(3); |
[ 1 0 0 ] |
[ 1 0 0 ] |
[ 0 1 0 ] |
[ 0 1 0 ] |
[ 0 0 1 ] |
[ 0 0 1 ] |
@end example |
@end example |
|
|
@node mat_diag,,, Matrix operations |
@node matrix_diag,,, Matrix operations |
@subsection @code{mat_diag} |
@subsection @code{matrix_diag} |
@findex mat_diag |
@findex matrix_diag |
@table @t |
@table @t |
@item mat_diag(@var{L}) |
@item matrix_diag(@var{L}) |
:: $B%j%9%H(B @var{L} $B$NMWAG$rBP3Q@.J,$H$9$kBP3Q9TNs$r@8@.$7$^$9(B. |
:: $B%j%9%H(B @var{L} $B$NMWAG$rBP3Q@.J,$H$9$kBP3Q9TNs$r@8@.$7$^$9(B. |
@end table |
@end table |
@table @var |
@table @var |
|
|
$B%j%9%H(B |
$B%j%9%H(B |
@end table |
@end table |
@itemize @bullet |
@itemize @bullet |
@item @code{mat_diag}$B$NNc(B. |
@item @code{matrix_diag}$B$NNc(B. |
@end itemize |
@end itemize |
@example |
@example |
[301] mat_diag([1,2,3]); |
[301] matrix_diag([1,2,3]); |
[ 1 0 0 ] |
[ 1 0 0 ] |
[ 0 2 0 ] |
[ 0 2 0 ] |
[ 0 0 3 ] |
[ 0 0 3 ] |
|
|
[302] mat_diag([a,b,c]); |
[302] matrix_diag([a,b,c]); |
[ a 0 0 ] |
[ a 0 0 ] |
[ 0 b 0 ] |
[ 0 b 0 ] |
[ 0 0 c ] |
[ 0 0 c ] |
@end example |
@end example |
|
|
@node mat_trans,,, Matrix operations |
@node matrix_trans,,, Matrix operations |
@subsection @code{mat_trans} |
@subsection @code{matrix_trans} |
@findex mat_trans |
@findex matrix_trans |
@table @t |
@table @t |
@item mat_trans(@var{A}) |
@item matrix_trans(@var{A}) |
:: $B9TNs(B @var{A} $B$NE>CV9TNs$r5a$a$^$9(B. |
:: $B9TNs(B @var{A} $B$NE>CV9TNs$r5a$a$^$9(B. |
@end table |
@end table |
@table @var |
@table @var |
|
|
$B9TNs(B or $B%j%9%H(B |
$B9TNs(B or $B%j%9%H(B |
@end table |
@end table |
@itemize @bullet |
@itemize @bullet |
@item @code{mat_trans}$B$NNc(B. |
@item @code{matrix_trans}$B$NNc(B. |
@end itemize |
@end itemize |
@example |
@example |
[303] mat_trans([[a,b],[c,d]]); |
[303] matrix_trans([[a,b],[c,d]]); |
[ a c ] |
[ a c ] |
[ b d ] |
[ b d ] |
|
|
[304] mat_trans([[1,2,3],[4,5,6],[7,8,9]]); |
[304] matrix_trans([[1,2,3],[4,5,6],[7,8,9]]); |
[ 1 4 7 ] |
[ 1 4 7 ] |
[ 2 5 8 ] |
[ 2 5 8 ] |
[ 3 6 9 ] |
[ 3 6 9 ] |
@end example |
@end example |
|
|
@node mat_inverse,,, Matrix operations |
@node matrix_inverse,,, Matrix operations |
@subsection @code{mat_inverse} |
@subsection @code{matrix_inverse} |
@findex mat_inverse |
@findex matrix_inverse |
@table @t |
@table @t |
@item mat_inverse(@var{A}) |
@item matrix_inverse(@var{A}) |
:: $B9TNs(B @var{A} $B$N5U9TNs$r5a$a$^$9(B. |
:: $B9TNs(B @var{A} $B$N5U9TNs$r5a$a$^$9(B. |
@end table |
@end table |
@table @var |
@table @var |
|
|
@end table |
@end table |
@itemize @bullet |
@itemize @bullet |
@item $B9TNs(B @var{A} $B$N@.J,$OM-M}?t(B or $BB?9`<0(B. |
@item $B9TNs(B @var{A} $B$N@.J,$OM-M}?t(B or $BB?9`<0(B. |
@item @code{mat_inverse}$B$NNc(B. |
@item @code{matrix_inverse}$B$NNc(B. |
@end itemize |
@end itemize |
@example |
@example |
[309] mat_inverse([[1,1],[1,2]]); |
[309] matrix_inverse([[1,1],[1,2]]); |
[ 2 -1 ] |
[ 2 -1 ] |
[ -1 1 ] |
[ -1 1 ] |
|
|
[310] mat_inverse([[a,b],[c,d]]); |
[310] matrix_inverse([[a,b],[c,d]]); |
[ (d)/(d*a-c*b) (-b)/(d*a-c*b) ] |
[ (d)/(d*a-c*b) (-b)/(d*a-c*b) ] |
[ (-c)/(d*a-c*b) (a)/(d*a-c*b) ] |
[ (-c)/(d*a-c*b) (a)/(d*a-c*b) ] |
@end example |
@end example |
|
|
@node mat_solve,,, Matrix operations |
@node matrix_solve,,, Matrix operations |
@subsection @code{mat_solve} |
@subsection @code{matrix_solve} |
@findex mat_solve |
@findex matrix_solve |
@table @t |
@table @t |
@item mat_solve(@var{A},@var{X},@var{Y}) |
@item matrix_solve(@var{A},@var{X},@var{Y}) |
:: @code{mat_solve}$B$OJ}Dx<0(B A*X=Y $B$N2r$r5a$a$^$9(B. |
:: @code{matrix_solve}$B$OJ}Dx<0(B A*X=Y $B$N2r$r5a$a$^$9(B. |
@end table |
@end table |
@table @var |
@table @var |
@item return |
@item return |
|
|
@end table |
@end table |
@itemize @bullet |
@itemize @bullet |
@item $B9TNs(B @var{A} $B$N@.J,$OM-M}?t(B or $BB?9`<0(B. |
@item $B9TNs(B @var{A} $B$N@.J,$OM-M}?t(B or $BB?9`<0(B. |
@item @code{mat_solve}$B$NNc(B. |
@item @code{matrix_solve}$B$NNc(B. |
@end itemize |
@end itemize |
@example |
@example |
[376] mat_solve([[1,-1],[2,3]],[x,y],[1,1]); |
[376] matrix_solve([[1,-1],[2,3]],[x,y],[1,1]); |
[[x,4/5],[y,-1/5]] |
[[x,4/5],[y,-1/5]] |
|
|
[377] mat_solve([[a,b],[c,d]],[x,y],[1,1]); |
[377] matrix_solve([[a,b],[c,d]],[x,y],[1,1]); |
[[x,(-b+d)/(d*a-c*b)],[y,(a-c)/(d*a-c*b)]] |
[[x,(-b+d)/(d*a-c*b)],[y,(a-c)/(d*a-c*b)]] |
@end example |
@end example |
|
|
@node mat_kernel,,, Matrix operations |
@node matrix_kernel,,, Matrix operations |
@subsection @code{mat_kernel} |
@subsection @code{matrix_kernel} |
@findex mat_kernel |
@findex matrix_kernel |
@table @t |
@table @t |
@item mat_kernel(@var{A}) |
@item matrix_kernel(@var{A}) |
:: @code{mat_kernel}$B$O9TNs(B A $B$N(B kernel $B$N4pDl$r5a$a$^$9(B. |
:: @code{matrix_kernel}$B$O9TNs(B A $B$N(B kernel $B$N4pDl$r5a$a$^$9(B. |
@end table |
@end table |
@table @var |
@table @var |
@item return |
@item return |
|
|
@end table |
@end table |
@itemize @bullet |
@itemize @bullet |
@item $B9TNs(B @var{A} $B$N@.J,$OM-M}?t(B or $BB?9`<0(B. |
@item $B9TNs(B @var{A} $B$N@.J,$OM-M}?t(B or $BB?9`<0(B. |
@item @code{mat_kernel}$B$NNc(B. |
@item @code{matrix_kernel}$B$NNc(B. |
@end itemize |
@end itemize |
@example |
@example |
[383] mat_kernel([[1,2,3,4],[1,0,1,0]]); |
[383] matrix_kernel([[1,2,3,4],[1,0,1,0]]); |
[2,[[1,0,-1,1/2],[0,1,0,-1/2]]] |
[2,[[1,0,-1,1/2],[0,1,0,-1/2]]] |
|
|
[384] mat_kernel([[1,2,3,4],[1,0,1,0],[0,0,0,1]]); |
[384] matrix_kernel([[1,2,3,4],[1,0,1,0],[0,0,0,1]]); |
[1,[[1,1,-1,0]]] |
[1,[[1,1,-1,0]]] |
@end example |
@end example |