Calcular un determinante 4x4 - Historial de revisiones

Dani en 11:16 26 abr 2011

2011-04-26T11:16:45Z

2011-04-26T08:59:00Z

2011-04-16T17:26:29Z

Determinante 4x4

2011-04-16T17:24:18Z

Matriz 4.4

2011-04-11T10:50:52Z

Página creada con 'M:matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a]); determinant(A);'

Página nueva

M:matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a]); determinant(A);

@@ Línea 1: / Línea 1: @@
-(%i1) M: matrix(
- [a,a,a,a],
+ (%i1) matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a])$
- [2,a,a,a],
+ (%i2) determinant(%);
- [3,2,a,a],
+ (%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))
- [4,3,2,a]
+ (%i3) ratsimp(%);
-);
+ (%o3) a^4-6*a^3+12*a^2-8*a

@@ Línea 1: / Línea 1: @@
 M:matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a]); determinant(A);
-/* [wxMaxima: input   start ] */
+(%i1) M: matrix(
   [a,a,a,a],
   [2,a,a,a],
@@ Línea 8: / Línea 7: @@
   [4,3,2,a]
 );
-/* [wxMaxima: input   end   ] */
+(%o1) matrix([a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a])
-/* [wxMaxima: input   start ] */
+(%i2) determinant(%);
-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))

← Revisión anterior		Revisión del 17:24 16 abr 2011
Línea 1:		Línea 1:
	M:matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a]); determinant(A);		M:matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a]); determinant(A);
		+
		+	/* [wxMaxima: input start ] */
		+	M: matrix(
		+	[a,a,a,a],
		+	[2,a,a,a],
		+	[3,2,a,a],
		+	[4,3,2,a]
		+	);
		+	/* [wxMaxima: input end ] */
		+	/* [wxMaxima: input start ] */
		+	determinant(%);
		+	/* [wxMaxima: input end ] */