\( \DeclareMathOperator{\abs}{abs} \newcommand{\ensuremath}[1]{\mbox{$#1$}} \)
(%i2) |
f(
v)
:
=[
v[
1],
v[
2]
-
v[
1],
v[
3]
-
v[
1],
2
*
v[
1]
-
v[
2]]
$
e3 : ident( 3) $ |
(%i4) |
expr
:
rat(
f([
a,
b,
c]).
matrix([
1],[
X],[
X
^
2],[
X
^
3]),
X)
$
print( "f(a,b,c)=", expr) $ |
La matriz asociada será la proporcionada por las imágenes de la base canónica de \(\mathbb{R}^3\)
(%i5) | transpose( matrix( f( row( e3, 1)[ 1]), f( row( e3, 2)[ 1]), f( row( e3, 3)[ 1]))) ; |
Verifiquemos el resultado:
(%i6) | rat( transpose( %. matrix([ a],[ b],[ c])). matrix([ 1],[ X],[ X ^ 2],[ X ^ 3]), X) ; |
Created with wxMaxima.
El ejemplo nos dice que la aplicación es: