Bueno, estoy tratando de analizar el siguiente circuito:
simular este circuito : esquema creado con CircuitLab
Cuando usamos y aplicamos KCL , podemos escribir el siguiente conjunto de ecuaciones:
Cuando usamos y aplicamos la ley de Ohm , podemos escribir el siguiente conjunto de ecuaciones:
Como ya tiene la respuesta, le presentaré un método que usa Mathematica para resolver este problema. Usé el siguiente código para resolver los dos sistemas desde arriba:
In[1]:=FullSimplify[
Solve[{Ia == I1 + I5, I5 == I2 + I3, I4 == Ib + I3, I1 == Ia + I6,
0 == I2 + I6 + I7, I4 == Ib + I7, I1 == V1/R1, I2 == V1/R2,
I3 == (V1 - V2)/R3, I4 == V2/R4, Ib == (V3 - V2)/R5}, {I1, I2, I3,
I4, I5, I6, I7, V1, V2, V3}]]
Out[1]={{I1 -> (R2 (Ib R4 + Ia (R3 + R4)))/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
I2 -> (R1 (Ib R4 + Ia (R3 + R4)))/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
I3 -> (Ia R1 R2 - Ib (R1 + R2) R4)/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
I4 -> ((Ia + Ib) R1 R2 + Ib (R1 + R2) R3)/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
I5 -> (-Ib R2 R4 + Ia R1 (R2 + R3 + R4))/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
I6 -> (Ib R2 R4 - Ia R1 (R2 + R3 + R4))/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
I7 -> (Ia R1 R2 - Ib (R1 + R2) R4)/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
V1 -> (R1 R2 (Ib R4 + Ia (R3 + R4)))/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
V2 -> (((Ia + Ib) R1 R2 + Ib (R1 + R2) R3) R4)/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)),
V3 -> Ia R4 + Ib R4 - ((R1 + R2) R4 (Ib R4 + Ia (R3 + R4)))/(
R2 (R3 + R4) + R1 (R2 + R3 + R4)) + Ib R5}}
Para encontrar la equivalencia de Thevenin, necesitamos tomar un botín en el voltaje de circuito abierto (cuando ) y a la corriente de cortocircuito (cuando ):
In[2]:=FullSimplify[
Solve[{Ia == I1 + I5, I5 == I2 + I3, I4 == Ib + I3, I1 == Ia + I6,
0 == I2 + I6 + I7, I4 == Ib + I7, I1 == V1/R1, I2 == V1/R2,
I3 == (V1 - V2)/Infinity, I4 == V2/R4, Ib == (V3 - V2)/R5}, {I1,
I2, I3, I4, I5, I6, I7, V1, V2, V3}]]
Out[2]={{I1 -> (Ia R2)/(R1 + R2), I2 -> (Ia R1)/(R1 + R2), I3 -> 0, I4 -> Ib,
I5 -> (Ia R1)/(R1 + R2), I6 -> -((Ia R1)/(R1 + R2)), I7 -> 0,
V1 -> (Ia R1 R2)/(R1 + R2), V2 -> Ib R4, V3 -> Ib (R4 + R5)}}
In[3]:=FullSimplify[(Ia R1 R2)/(R1 + R2) - Ib R4]
Out[3]=(Ia R1 R2)/(R1 + R2) - Ib R4
In[4]:=Limit[(Ia R1 R2 - Ib (R1 + R2) R4)/(R2 (R3 + R4) + R1 (R2 + R3 + R4)),
R3 -> 0]
Out[4]=(Ia R1 R2 - Ib (R1 + R2) R4)/(R2 R4 + R1 (R2 + R4))
Entonces, usando sus valores obtenemos:
usuario103380
usuario215805
usuario215805
amigo ankita