\( \DeclareMathOperator{\abs}{abs} \newcommand{\ensuremath}[1]{\mbox{$#1$}} \)
(%i3) |
expr
:
rat([
p_0,
p_1,
p_2,
p_3].
matrix([
1],[
X],[
X
^
2],[
X
^
3]),
X)
$
h( p) : =[ coeff( p, X, 0), coeff( p, X, 1), coeff( p, X, 2), coeff( p, X, 3)] $ print( "h(", expr, ")=", h( expr)) $ |
La matriz del cambio de base es:
(%i4) | base : transpose( matrix( h( 1 - X ^ 3), h( X - X ^ 3), h( X ^ 2 - X ^ 3), h( 2 * X ^ 3))) ; |
Como las coordenadas del polinomio \(3X^3-2X^2+X-1\) respecto de la base canónica son [-1,1,-2,3], las nuevas coordenadas son:
(%i5) | new_coor :( transpose( invert( base). transpose( matrix([ - 1, 1, - 2, 3])))) ; |
En efecto,
(%i6) | rat( new_coor. matrix([ 1 - X ^ 3],[ X - X ^ 3],[ X ^ 2 - X ^ 3],[ 2 * X ^ 3]), X) ; |
Created with wxMaxima.
Tratamos de deducir las coordenadas del polinomio \(3X^3-2X^2+X-1\) respecto de la base \(\{1-X^3,X-X^3,X^2-X^3,2X^3\}\)
Para nuestro propósito, consideremos la apliación de los polinomios de grado 3 los vectores de \(\mathbb{R}^4\) daad por: