Calcular un determinante 4x4
De Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11)
M:matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a]); determinant(A);
(%i1) M: matrix(
[a,a,a,a], [2,a,a,a], [3,2,a,a], [4,3,2,a]
); (%o1) matrix([a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a]) (%i2) determinant(%); (%o2) a*(a*(a^2-2*a)+a^2+(4-3*a)*a)-a*(2*(a^2-2*a)+a^2+(6-4*a)*a)+a*(a^2-a)-a*(-(6-4*a)*a+a+2*(4-3*a))