Page 332 - Una innovación a la mecánica cuántica

A partir de esta matriz, se obtiene el polinomio característico, haciendo
uso del software denominado minor.exe programado por el autor con su
algoritmo. Por la extensión de la salida, sólo se indican los coeficientes del
polinomio característico y su solución con MatLab:

>> p=[1 -13 66.07 -178.6 295.73 -323.35 243.17 -128.23 47.56 -12.26
2.13 -0.24 0.01]

p =

1.0000 -13.0000 66.0700 -178.6000 295.7300 -323.3500 243.1700
-128.2300 47.5600 -12.2600 2.1300 -0.2400 0.0100

>> r=roots(p)

r =

5.0776
2.8548

1.0815
0.9301 + 0.3015i
0.9301 - 0.3015i
0.6277 + 0.4338i
0.6277 - 0.4338i

0.3159 + 0.3976i
0.3159 - 0.3976i
0.0814 + 0.2281i
0.0814 - 0.2281i

0.0758

330