La matriz aumentada y la matriz de permutación son las siguientes:
A
aug
Almacene la matriz aumentada en la variable AAUG, entonces presione ‚
@AAUG para conseguir una copia en la pantalla.
función CSWP (inglés, Column Swap, o intercambio de columnas) fácilmente
disponible, para lo cual utilizamos: ‚N~~cs~ (encontrar
CSWP), @@OK@@. Usted recibirá un mensaje de error, presione $, e ignore el
mensaje. Después, hacer el menú ROW (inglés, fila) disponible presionando:
„Ø @) C REAT @) @ ROW@.
Estamos listos ahora a comenzar la eliminación de Gauss-Jordan con pivoteo
completo. Necesitaremos no perder de vista la matriz de la permutación, así
que anote la matriz P en papel.
Primero, comprobamos el pivote a
absoluto más grande de la primera fila y de la primera columna es el valor
a
= 8. Puesto que quisiéramos que este número fuera el pivote, entonces
31
intercambiamos las filas 1 y 3, usando: 1#3L @RSWP. La matriz
aumentada y la matriz de permutación son ahora:
8
16
2
1
Comprobando el pivote en la posición (1,1) ahora encontramos que 16 es un
pivote mejor que 8, así, realizamos un intercambio de columnas como sigue:
1#2‚N @@OK@@ @RSWP.
permutación son ahora:
16
8
0
2
2
1
8X +16Y- Z = 41.
1
2
3
2
2
0
3
1
,
P
8
16
1
41
. Notamos que el elemento con el valor
11
-1
41
0
3
-1
2
3
2
La matriz aumentada y la matriz de
-1
41
3
-1
3
2
1
0
0
0
1
0
.
0
0
1
Deseamos mantener la
0 0 1
0 1 0
0 0 1
0 0 1
1 0 0
0 1 0
Página 11-36