Producto de matrices

Se sabe que las cuatro personas del grupo A (A1, A2, A3 y A4) padecen una enfermedad contagiosa y han estado en contacto con seis personas de un grupo B (de B1 a B6). Estos contactos directos están representados mediante las líneas en un grafo y con números en la matriz A.

En la matriz A, si el elemento aij es igual a 1, nos indica que la i-ésima persona del grupo A (Ai)ha estado en contacto con la j-ésima persona del grupo B (Bj). De esta forma, el elemento a23 nos dice que la persona infectada A2 ha estado en contacto (si es 1) o no (si es 0) con la persona B3.

Un tercer grupo C de cinco personas (de C1 a C5) ha estado en contacto con el grupo B. De la misma forma hemos representado los contactos mediante la matriz B y las correspondientes líneas en el grafo.

A los miembros del grupo A se les está proporcionando un tratamiento, los del grupo B están en la fase de realización de analíticas pero están controlados. El problema surge cuando solo tenemos vacunas para dos de los cinco miembros del grupo C. Queremos saber cuáles de ellos tienen más posiblidades de desarrollar la enfermedad por los contactos que han tenido y aprovechar las vacunas de la mejor manera posible.

Tienes botones para seleccionar cualquiera de las filas (i=2) de la primera matriz y una de las columnas (j=3) de la segunda matriz. Cada uno de esos productos puede ser 1 ó 0, lo que indica la posibilidad de que la enfermedad haya pasado de Ai hasta Cj por medio de cada una de las seis personas del grupo B. La suma nos da por resultado la cantidad de vías por las que ha podido ser transmitida la enfermedad. Relaciona ese número con las conexiones entre los puntos del grafo la ventana izquierda.
La matriz producto contiene la información del número de formas que ha podido transmitir la enfermedad de cada miembro de A a los de C por medio de todos los de B. ¿Qué dos personas del grupo C crees necesitarán más la vacuna?
Pulsa sobre para cambien los datos de contactos entre los miembros de los grupos y revisa las dos cuestiones anteriores.

Ejemplo

Ejemplo

Nuevo ejercicio

Nuevo ejercicio

Fila (1 a 4)

Columna (1 a 5)

Introduce un elemento de
la matriz producto para 
analizarlo con detalle

Grafo

Producto de matrices

n3 = 1.6 (slider from 1 to 2, step 0.1)
C_1 = (0.94, 3.76)
n2 = 1.4 (slider from 1 to 2, step 0.1)
B_1 = (-1, 4)
n1 = 1.6 (slider from 1 to 2, step 0.1)
A_1 = (-3, 3)
n = 0 (slider from 0 to 1, step 1)
E16 = 0
A23 = If(Random[0, 1000] ≤ 666, 0, 1)
B23 = If(Random[0, 1000] ≤ 666, 0, 1)
E23 = If(Random[0, 1000] ≤ 666, 0, 1)
D23 = If(Random[0, 1000] ≤ 666, 0, 1)
C23 = If(Random[0, 1000] ≤ 666, 0, 1)
A22 = If(Random[0, 1000] ≤ 666, 0, 1)
B22 = If(Random[0, 1000] ≤ 666, 0, 1)
E22 = If(Random[0, 1000] ≤ 666, 0, 1)
D22 = If(Random[0, 1000] ≤ 666, 0, 1)
C22 = If(Random[0, 1000] ≤ 666, 0, 1)
A21 = If(Random[0, 1000] ≤ 666, 0, 1)
B21 = If(Random[0, 1000] ≤ 666, 0, 1)
E21 = If(Random[0, 1000] ≤ 666, 0, 1)
D21 = If(Random[0, 1000] ≤ 666, 0, 1)
C21 = If(Random[0, 1000] ≤ 666, 0, 1)
A20 = If(Random[0, 1000] ≤ 666, 0, 1)
B20 = If(Random[0, 1000] ≤ 666, 0, 1)
E20 = If(Random[0, 1000] ≤ 666, 0, 1)
D20 = If(Random[0, 1000] ≤ 666, 0, 1)
C20 = If(Random[0, 1000] ≤ 666, 0, 1)
A18 = If(Random[0, 1000] ≤ 666, 0, 1)
B18 = If(Random[0, 1000] ≤ 666, 0, 1)
C18 = If(Random[0, 1000] ≤ 666, 0, 1)
E18 = If(Random[0, 1000] ≤ 666, 0, 1)
D18 = If(Random[0, 1000] ≤ 666, 0, 1)
A19 = If(Random[0, 1000] ≤ 666, 0, 1)
B19 = If(Random[0, 1000] ≤ 666, 0, 1)
E19 = If(Random[0, 1000] ≤ 666, 0, 1)
D19 = If(Random[0, 1000] ≤ 666, 0, 1)
C19 = If(Random[0, 1000] ≤ 666, 0, 1)
EE: {{A18, B18, C18, D18, E18}, {A19, B19, C19, D19, E19}, {A20, B20, C20, D20, E20}, {A21, B21, C21, D21, E21}, {A22, B22, C22, D22, E22}, {A23, B23, C23, D23, E23}}
A9 = If(Random[0, 1000] ≤ 666, 0, 1)
B9 = If(Random[0, 1000] ≤ 666, 0, 1)
C9 = If(Random[0, 1000] ≤ 666, 0, 1)
E9 = If(Random[0, 1000] ≤ 666, 0, 1)
D9 = If(Random[0, 1000] ≤ 666, 0, 1)
F9 = If(Random[0, 1000] ≤ 666, 0, 1)
A8 = If(Random[0, 1000] ≤ 666, 0, 1)
B8 = If(Random[0, 1000] ≤ 666, 0, 1)
C8 = If(Random[0, 1000] ≤ 666, 0, 1)
E8 = If(Random[0, 1000] ≤ 666, 0, 1)
D8 = If(Random[0, 1000] ≤ 666, 0, 1)
F8 = If(Random[0, 1000] ≤ 666, 0, 1)
A6 = If(Random[0, 1000] ≤ 666, 0, 1)
B6 = If(Random[0, 1000] ≤ 666, 0, 1)
C6 = If(Random[0, 1000] ≤ 666, 0, 1)
E6 = If(Random[0, 1000] ≤ 666, 0, 1)
F6 = If(Random[0, 1000] ≤ 666, 0, 1)
D6 = If(Random[0, 1000] ≤ 666, 0, 1)
A7 = If(Random[0, 1000] ≤ 666, 0, 1)
B7 = If(Random[0, 1000] ≤ 666, 0, 1)
C7 = If(Random[0, 1000] ≤ 666, 0, 1)
E7 = If(Random[0, 1000] ≤ 666, 0, 1)
D7 = If(Random[0, 1000] ≤ 666, 0, 1)
F7 = If(Random[0, 1000] ≤ 666, 0, 1)
DD: {{A6, B6, C6, D6, E6, F6}, {A7, B7, C7, D7, E7, F7}, {A8, B8, C8, D8, E8, F8}, {A9, B9, C9, D9, E9, F9}}
D16 = 0
C16 = 1
B16 = 0
A16 = 0
E15 = 0
D15 = 1
C15 = 0
B15 = 0
A15 = 0
E14 = 1
D14 = 0
C14 = 0
B14 = 0
A14 = 1
E13 = 0
D13 = 0
C13 = 0
B13 = 1
A13 = 0
E12 = 0
D12 = 1
C12 = 0
B12 = 0
A12 = 0
E11 = 1
D11 = 0
C11 = 1
B11 = 0
A11 = 0
BB: {{A11, B11, C11, D11, E11}, {A12, B12, C12, D12, E12}, {A13, B13, C13, D13, E13}, {A14, B14, C14, D14, E14}, {A15, B15, C15, D15, E15}, {A16, B16, C16, D16, E16}}
B = If(n ≟ 0, BB, EE)
F4 = 1
E4 = 0
D4 = 0
C4 = 0
B4 = 0
A4 = 1
F3 = 0
E3 = 1
D3 = 1
C3 = 0
B3 = 0
A3 = 0
F1 = 0
F2 = 1
E2 = 0
D2 = 1
C2 = 0
B2 = 0
A2 = 1
E1 = 1
D1 = 0
C1 = 0
B1 = 1
A1 = 0
AA: {{A1, B1, C1, D1, E1, F1}, {A2, B2, C2, D2, E2, F2}, {A3, B3, C3, D3, E3, F3}, {A4, B4, C4, D4, E4, F4}}
A = If(n ≟ 0, AA, DD)
C: (A * B)
H1 = Random(1, 4)
H2 = Random(1, 5)
lista1: {}
A_3: A_1 - (0, (2 * n1))
A_4: A_1 - (0, (3 * n1))
B_3: B_1 - (0, (2 * n2))
B_4: B_1 - (0, (3 * n2))
C_3: C_1 - (0, (2 * n3))
C_4: C_1 - (0, (3 * n3))
C_5: C_1 - (0, (4 * n3))
K1: A_1
A_2: A_1 - (0, n1)
K2: A_2
K3: A_3
K4: A_4
L1: B_1
B_2: B_1 - (0, n2)
L2: B_2
L3: B_3
L4: B_4
M1: C_1
C_2: C_1 - (0, n3)
M2: C_2
M3: C_3
M4: C_4
M5: C_5
B_5: B_1 - (0, (4 * n2))
B_6: B_1 - (0, (5 * n2))
L5: B_5
L6: B_6
N1 = Segment($K$1, L$1)
N2 = Segment($K$1, L$2)
N3 = Segment($K$1, L$3)
N4 = Segment($K$1, L$4)
N5 = Segment($K$1, L$5)
N6 = Segment($K$1, L$6)
N8 = Segment($K$2, L$2)
N9 = Segment($K$2, L$3)
N10 = Segment($K$2, L$4)
N11 = Segment($K$2, L$5)
N12 = Segment($K$2, L$6)
N13 = Segment($K$3, L$1)
N14 = Segment($K$3, L$2)
N15 = Segment($K$3, L$3)
N16 = Segment($K$3, L$4)
N17 = Segment($K$3, L$5)
N18 = Segment($K$3, L$6)
N19 = Segment($K$4, L$1)
N20 = Segment($K$4, L$2)
N21 = Segment($K$4, L$3)
N22 = Segment($K$4, L$4)
N23 = Segment($K$4, L$5)
N24 = Segment($K$4, L$6)
N7 = Segment($K$2, L$1)
R1 = Segment($L$1, M$1)
R2 = Segment($L$1, M$2)
R3 = Segment($L$1, M$3)
R4 = Segment($L$1, M$4)
R5 = Segment($L$1, M$5)
R6 = Segment($L$2, M$1)
R7 = Segment($L$2, M$2)
R8 = Segment($L$2, M$3)
R9 = Segment($L$2, M$4)
R10 = Segment($L$2, M$5)
R11 = Segment($L$3, M$1)
R12 = Segment($L$3, M$2)
R25 = Segment($L$5, M$5)
R24 = Segment($L$5, M$4)
R23 = Segment($L$5, M$3)
R22 = Segment($L$5, M$2)
R21 = Segment($L$5, M$1)
R20 = Segment($L$4, M$5)
R19 = Segment($L$4, M$4)
R18 = Segment($L$4, M$3)
R17 = Segment($L$4, M$2)
R16 = Segment($L$4, M$1)
R15 = Segment($L$5, M$5)
R14 = Segment($L$5, M$4)
R13 = Segment($L$5, M$3)
R26 = Segment($L$6, M$1)
R27 = Segment($L$6, M$2)
R28 = Segment($L$6, M$3)
R29 = Segment($L$6, M$4)
R30 = Segment($L$6, M$5)
i = 2 (slider from 1 to 4, step 1)
j = 3 (slider from 1 to 5, step 1)
texto1: "A×B=" + (LaTeX[A]) + "x" + (LaTeX[B]) + ""
CasillaDeEntrada1 = Textfield(i)
CasillaDeEntrada2 = Textfield(j)
O1 = 1
O2 = 2
O3: (2 * O2) - O1
O4: (2 * O3) - O2
O5: (2 * O4) - O3
O6: (2 * O5) - O4
O7: (2 * O6) - O5
O8: (2 * O7) - O6
O9: (2 * O8) - O7
O10: (2 * O9) - O8
O11: (2 * O10) - O9
O12: (2 * O11) - O10
O13: (2 * O12) - O11
O14: (2 * O13) - O12
O15: (2 * O14) - O13
O16: (2 * O15) - O14
O17: (2 * O16) - O15
O18: (2 * O17) - O16
O19: (2 * O18) - O17
O20: (2 * O19) - O18
O21: (2 * O20) - O19
O22: (2 * O21) - O20
O23: (2 * O22) - O21
O24: (2 * O23) - O22
S1 = 1
S2 = 2
S3: (2 * S2) - S1
S4: (2 * S3) - S2
S5: (2 * S4) - S3
S6: (2 * S5) - S4
S7: (2 * S6) - S5
S8: (2 * S7) - S6
S9: (2 * S8) - S7
S10: (2 * S9) - S8
S11: (2 * S10) - S9
S12: (2 * S11) - S10
S13: (2 * S12) - S11
S14: (2 * S13) - S12
S15: (2 * S14) - S13
S16: (2 * S15) - S14
S17: (2 * S16) - S15
S18: (2 * S17) - S16
S19: (2 * S18) - S17
S20: (2 * S19) - S18
S21: (2 * S20) - S19
S22: (2 * S21) - S20
S23: (2 * S22) - S21
S24: (2 * S23) - S22
T2 = If(Mod[S2, 5] ≟ 0, 5, Mod[S2, 5])
T3 = If(Mod[S3, 5] ≟ 0, 5, Mod[S3, 5])
T4 = If(Mod[S4, 5] ≟ 0, 5, Mod[S4, 5])
T5 = If(Mod[S5, 5] ≟ 0, 5, Mod[S5, 5])
T6 = If(Mod[S6, 5] ≟ 0, 5, Mod[S6, 5])
T7 = If(Mod[S7, 5] ≟ 0, 5, Mod[S7, 5])
T8 = If(Mod[S8, 5] ≟ 0, 5, Mod[S8, 5])
T9 = If(Mod[S9, 5] ≟ 0, 5, Mod[S9, 5])
T10 = If(Mod[S10, 5] ≟ 0, 5, Mod[S10, 5])
T11 = If(Mod[S11, 5] ≟ 0, 5, Mod[S11, 5])
T12 = If(Mod[S12, 5] ≟ 0, 5, Mod[S12, 5])
T13 = If(Mod[S13, 5] ≟ 0, 5, Mod[S13, 5])
T14 = If(Mod[S14, 5] ≟ 0, 5, Mod[S14, 5])
T15 = If(Mod[S15, 5] ≟ 0, 5, Mod[S15, 5])
T16 = If(Mod[S16, 5] ≟ 0, 5, Mod[S16, 5])
T17 = If(Mod[S17, 5] ≟ 0, 5, Mod[S17, 5])
T18 = If(Mod[S18, 5] ≟ 0, 5, Mod[S18, 5])
T19 = If(Mod[S19, 5] ≟ 0, 5, Mod[S19, 5])
T20 = If(Mod[S20, 5] ≟ 0, 5, Mod[S20, 5])
T21 = If(Mod[S21, 5] ≟ 0, 5, Mod[S21, 5])
T22 = If(Mod[S22, 5] ≟ 0, 5, Mod[S22, 5])
T23 = If(Mod[S23, 5] ≟ 0, 5, Mod[S23, 5])
T24 = If(Mod[S24, 5] ≟ 0, 5, Mod[S24, 5])
T1 = If(Mod[S1, 5] ≟ 0, 5, Mod[S1, 5])
P1: floor((O1 - 1) / 6 + 1)
P2: floor((O2 - 1) / 6 + 1)
P3: floor((O3 - 1) / 6 + 1)
P4: floor((O4 - 1) / 6 + 1)
P5: floor((O5 - 1) / 6 + 1)
P6: floor((O6 - 1) / 6 + 1)
P7: floor((O7 - 1) / 6 + 1)
P8: floor((O8 - 1) / 6 + 1)
P9: floor((O9 - 1) / 6 + 1)
P10: floor((O10 - 1) / 6 + 1)
P11: floor((O11 - 1) / 6 + 1)
P12: floor((O12 - 1) / 6 + 1)
P13: floor((O13 - 1) / 6 + 1)
P14: floor((O14 - 1) / 6 + 1)
P15: floor((O15 - 1) / 6 + 1)
P16: floor((O16 - 1) / 6 + 1)
P17: floor((O17 - 1) / 6 + 1)
P18: floor((O18 - 1) / 6 + 1)
P19: floor((O19 - 1) / 6 + 1)
P20: floor((O20 - 1) / 6 + 1)
P21: floor((O21 - 1) / 6 + 1)
P22: floor((O22 - 1) / 6 + 1)
P23: floor((O23 - 1) / 6 + 1)
P24: floor((O24 - 1) / 6 + 1)
Q1 = If(P1 ≟ i, 1, 0)
Q2 = If(P2 ≟ i, 1, 0)
Q3 = If(P3 ≟ i, 1, 0)
Q4 = If(P4 ≟ i, 1, 0)
Q5 = If(P5 ≟ i, 1, 0)
Q6 = If(P6 ≟ i, 1, 0)
Q7 = If(P7 ≟ i, 1, 0)
Q8 = If(P8 ≟ i, 1, 0)
Q9 = If(P9 ≟ i, 1, 0)
Q10 = If(P10 ≟ i, 1, 0)
Q11 = If(P11 ≟ i, 1, 0)
Q12 = If(P12 ≟ i, 1, 0)
Q13 = If(P13 ≟ i, 1, 0)
Q14 = If(P14 ≟ i, 1, 0)
Q15 = If(P15 ≟ i, 1, 0)
Q16 = If(P16 ≟ i, 1, 0)
Q17 = If(P17 ≟ i, 1, 0)
Q18 = If(P18 ≟ i, 1, 0)
Q19 = If(P19 ≟ i, 1, 0)
Q20 = If(P20 ≟ i, 1, 0)
Q21 = If(P21 ≟ i, 1, 0)
Q22 = If(P22 ≟ i, 1, 0)
Q23 = If(P23 ≟ i, 1, 0)
Q24 = If(P24 ≟ i, 1, 0)
U1 = If(T1 ≟ j, 1, 0)
U2 = If(T2 ≟ j, 1, 0)
U3 = If(T3 ≟ j, 1, 0)
U4 = If(T4 ≟ j, 1, 0)
U5 = If(T5 ≟ j, 1, 0)
U6 = If(T6 ≟ j, 1, 0)
U7 = If(T7 ≟ j, 1, 0)
U8 = If(T8 ≟ j, 1, 0)
U9 = If(T9 ≟ j, 1, 0)
U10 = If(T10 ≟ j, 1, 0)
U11 = If(T11 ≟ j, 1, 0)
U12 = If(T12 ≟ j, 1, 0)
U13 = If(T13 ≟ j, 1, 0)
U14 = If(T14 ≟ j, 1, 0)
U15 = If(T15 ≟ j, 1, 0)
U16 = If(T16 ≟ j, 1, 0)
U17 = If(T17 ≟ j, 1, 0)
U18 = If(T18 ≟ j, 1, 0)
U19 = If(T19 ≟ j, 1, 0)
U20 = If(T20 ≟ j, 1, 0)
U21 = If(T21 ≟ j, 1, 0)
U22 = If(T22 ≟ j, 1, 0)
U23 = If(T23 ≟ j, 1, 0)
U24 = If(T24 ≟ j, 1, 0)
S25: (2 * S24) - S23
T25 = If(Mod[S25, 5] ≟ 0, 5, Mod[S25, 5])
U25 = If(T25 ≟ j, 1, 0)
S26: (2 * S25) - S24
T26 = If(Mod[S26, 5] ≟ 0, 5, Mod[S26, 5])
U26 = If(T26 ≟ j, 1, 0)
S27: (2 * S26) - S25
T27 = If(Mod[S27, 5] ≟ 0, 5, Mod[S27, 5])
U27 = If(T27 ≟ j, 1, 0)
S28: (2 * S27) - S26
T28 = If(Mod[S28, 5] ≟ 0, 5, Mod[S28, 5])
U28 = If(T28 ≟ j, 1, 0)
S29: (2 * S28) - S27
T29 = If(Mod[S29, 5] ≟ 0, 5, Mod[S29, 5])
U29 = If(T29 ≟ j, 1, 0)
S30: (2 * S29) - S28
T30 = If(Mod[S30, 5] ≟ 0, 5, Mod[S30, 5])
U30 = If(T30 ≟ j, 1, 0)
D = (-2.4, 4.56)
E = (-2.84, 4.56)
I = (4.02, 1.64)
u = Vector((-1, 4.1 - (0.6 * i)), (4, 4.1 - (0.6 * i)))
v = Vector((5.45 + (0.83 * (j - 1)), 5), (5.45 + (0.83 * (j - 1)), 1))
r1, a, b, c, d = Polygon((-1, 5.25 - (0.65 * i)), (4, 5.25 - (0.65 * i)), (4, 5.25 - (0.65 * (i - 1))), (-1, 5.25 - (0.65 * (i - 1))))
r2, e, f, g, h = Polygon((5.3 + (0.83 * (j - 1)), 6), (5.3 + (0.83 * (j - 1)), 2), (5.3 + (0.83 * j), 2), (5.3 + (0.83 * j), 6))
A25 = If(n ≟ 0, A1, A6)
A26 = If(n ≟ 0, A2, A7)
A27 = If(n ≟ 0, A3, A8)
A28 = If(n ≟ 0, A4, A9)
A5 = NaN
A10 = NaN
B25 = If(n ≟ 0, B1, B6)
B26 = If(n ≟ 0, B2, B7)
B27 = If(n ≟ 0, B3, B8)
B28 = If(n ≟ 0, B4, B9)
C25 = If(n ≟ 0, C1, C6)
C26 = If(n ≟ 0, C2, C7)
C27 = If(n ≟ 0, C3, C8)
C28 = If(n ≟ 0, C4, C9)
D25 = If(n ≟ 0, D1, D6)
D26 = If(n ≟ 0, D2, D7)
D27 = If(n ≟ 0, D3, D8)
D28 = If(n ≟ 0, D4, D9)
E25 = If(n ≟ 0, E1, E6)
E26 = If(n ≟ 0, E2, E7)
E27 = If(n ≟ 0, E3, E8)
E28 = If(n ≟ 0, E4, E9)
F25 = If(n ≟ 0, F1, F6)
F26 = If(n ≟ 0, F2, F7)
F27 = If(n ≟ 0, F3, F8)
F28 = If(n ≟ 0, F4, F9)
A32 = If(n ≟ 0, A11, A18)
A33 = If(n ≟ 0, A12, A19)
A34 = If(n ≟ 0, A13, A20)
A35 = If(n ≟ 0, A14, A21)
A36 = If(n ≟ 0, A15, A22)
A37 = If(n ≟ 0, A16, A23)
B32 = If(n ≟ 0, B11, B18)
B33 = If(n ≟ 0, B12, B19)
B34 = If(n ≟ 0, B13, B20)
B35 = If(n ≟ 0, B14, B21)
B36 = If(n ≟ 0, B15, B22)
B37 = If(n ≟ 0, B16, B23)
C32 = If(n ≟ 0, C11, C18)
C33 = If(n ≟ 0, C12, C19)
C34 = If(n ≟ 0, C13, C20)
C35 = If(n ≟ 0, C14, C21)
C36 = If(n ≟ 0, C15, C22)
C37 = If(n ≟ 0, C16, C23)
D32 = If(n ≟ 0, D11, D18)
D33 = If(n ≟ 0, D12, D19)
D34 = If(n ≟ 0, D13, D20)
D35 = If(n ≟ 0, D14, D21)
D36 = If(n ≟ 0, D15, D22)
D37 = If(n ≟ 0, D16, D23)
E32 = If(n ≟ 0, E11, E18)
E33 = If(n ≟ 0, E12, E19)
E34 = If(n ≟ 0, E13, E20)
E35 = If(n ≟ 0, E14, E21)
E36 = If(n ≟ 0, E15, E22)
E37 = If(n ≟ 0, E16, E23)
texto3: "A × B = " + (LaTeX[C]) + ""
A30 = If(i ≟ 0, 0, If[i ≟ 1, A25, If[i ≟ 2, A26, If[i ≟ 3, A27, A28]]])
B30 = If(i ≟ 0, 0, If[i ≟ 1, B25, If[i ≟ 2, B26, If[i ≟ 3, B27, B28]]])
C30 = If(i ≟ 0, 0, If[i ≟ 1, C25, If[i ≟ 2, C26, If[i ≟ 3, C27, C28]]])
D30 = If(i ≟ 0, 0, If[i ≟ 1, D25, If[i ≟ 2, D26, If[i ≟ 3, D27, D28]]])
E30 = If(i ≟ 0, 0, If[i ≟ 1, E25, If[i ≟ 2, E26, If[i ≟ 3, E27, E28]]])
F30 = If(i ≟ 0, 0, If[i ≟ 1, F25, If[i ≟ 2, F26, If[i ≟ 3, F27, F28]]])
G32 = If(j ≟ 1, A32, If[j ≟ 2, B32, If[j ≟ 3, C32, If[j ≟ 4, D32, E32]]])
G33 = If(j ≟ 1, A33, If[j ≟ 2, B33, If[j ≟ 3, C33, If[j ≟ 4, D33, E33]]])
G34 = If(j ≟ 1, A34, If[j ≟ 2, B34, If[j ≟ 3, C34, If[j ≟ 4, D34, E34]]])
G35 = If(j ≟ 1, A35, If[j ≟ 2, B35, If[j ≟ 3, C35, If[j ≟ 4, D35, E35]]])
G36 = If(j ≟ 1, A36, If[j ≟ 2, B36, If[j ≟ 3, C36, If[j ≟ 4, D36, E36]]])
G37 = If(j ≟ 1, A37, If[j ≟ 2, B37, If[j ≟ 3, C37, If[j ≟ 4, D37, E37]]])
texto4: "" + (LaTeX[A30]) + "×" + (LaTeX[G32]) + "+" + (LaTeX[B30]) + "×" + (LaTeX[G33]) + "+" + (LaTeX[C30]) + "×" + (LaTeX[G34]) + "+" + (LaTeX[D30]) + "×" + (LaTeX[G35]) + "+" + (LaTeX[E30]) + "×" + (LaTeX[G36]) + "+" + (LaTeX[F30]) + "×" + (LaTeX[G37]) + "="
A31 = NaN
G38 = NaN
H32: (A30 * G32)
G3 = NaN
H34: (C30 * G34)
H33: (B30 * G33)
H35: (D30 * G35)
H36: (E30 * G36)
H37: (F30 * G37)
H38 = Sum(H32:H37)
texto6: "Fila \; " + (LaTeX[i]) + ""
texto7: "Columna \; " + (LaTeX[j]) + ""
J: (5.7, -2.42)
i1: 5 - i
k = 1 (slider from -5 to 5, step -1)
texto5: "= " + (LaTeX[H32]) + "+" + (LaTeX[H33]) + "+" + (LaTeX[H34]) + "+" + (LaTeX[H35]) + "+" + (LaTeX[H36]) + "+" + (LaTeX[H37]) + "=" + (LaTeX[H38]) + ""
F = (-4, 6)
G = (2.38, -3.52)
H = (2, -2)
M = (-4, -1)
N = (-4, -2)
c1 = Circle(J + ((0.83 * (j - 1)), (-0.66 * (i - 1))), 0.45)