aboutsummaryrefslogtreecommitdiffstats
path: root/buch/chapters/40-eigenwerte/beispiele/n.maxima
blob: 9ed83b612323ad77ede5c4be688c0aa31ca162b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
/*
 * n.maxima
 *
 * (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
 */
A: matrix(
 [  1,  9, -4 ],
 [ -1,  3,  0 ],
 [ -2,  0,  3 ]
);

p: expand(charpoly(A,x));
factor(p);

A.A;
A.A.A;

A.A - 5*A;

A.A.A -7*A.A +16 *A;