Question

求大神帮忙用mathematica来解一下方程组~

求解其中Uc1和Uc2之间的关系，其中C1，C2，L，G，g为已知量，如果没有解析解的话数值解也是可以的，需要mathematica的代码，做出来了有追加，谢谢了！

Answer 1

这个方程组是可求符号解的，虽然用到了特殊符号。要从这个符号解里获得解析关系没这么容易。求数值解需要补充具体参数和边界条件，这里我随便给一个示例：

rule = {c1 -> 1, c2 -> 1, G -> 1, g -> 1, L -> 1};

eqn = {c2 u2'[t] == G (u2[t] - u1[t]) + i[t], c1 u1'[t] == G (u1[t] - u2[t]) + g u1[t], L i'[t] == -u2[t]};

bc = {u1[0] == 1, u2[0] == 1, i[0] == 1};

sol = DSolve[{eqn, bc}, {u1[t], u2[t], i[t]}, t] /. rule

Plot[Evaluate[{u1[t], u2[t]} /. sol], {t, 0, 1}]