关于Mathematica解方程组的问题,输出时没有错误,解不出来的原因
如题,我在一个三元一次方程组时,应该能解出来的,但是老是得不到结果。由于我刚刚接触Mathematica这个软件,不懂,所以我把解得编程给大家,希望大家能够帮帮我,看看问...
如题,我在一个三元一次方程组时,应该能解出来的,但是老是得不到结果。由于我刚刚接触Mathematica这个软件,不懂,所以我把解得编程给大家,希望大家能够帮帮我,看看问题出在哪里?f = 60 Degree;
q = 90 Degree;
arfA = 300 Degree;
q2 = 31 Degree;
w = 17;
bsx = 30;
bsy = 12;
bsz = -10;
t = 0.09;
NSolve[{bsx ==
bx3*(Cos[f]*Cos[q]*Cos[q2]*Sin[arfA] - Sin[q]*Sin[q2]*Sin[arfA] -
Sin[f]*Cos[q]*Cos[arfA]) +
by3*((Sin[f]*Sin[q]*Cos[arfA] - Cos[f]*Sin[q]*Cos[q2]*Sin[arfA] -
Cos[q]*Sin[q2]*Sin[arfA])*
Sin[w*t] - (Sin[f]*Cos[q2]*Sin[arfA] + Cos[f]*Cos[arfA])*
Cos[w*t]) +
bz3*((Sin[f]*Sin[q]*Cos[arfA] - Cos[f]*Sin[q]*Cos[q2]*Sin[arfA] -
Cos[q]*Sin[q2]*Sin[arfA])*
Cos[w*t] + (Sin[f]*Cos[q2]*Sin[arfA] + Cos[f]*Cos[arfA])*
Sin[w*t]) , bsy ==
bx3*(Cos[f]*Cos[q]*Sin[arfA] + Cos[f]*Cos[q2]*Cos[arfA] -
Sin[q]*Sin[q2]*Cos[arfA]) +
by3*((Cos[f]*Sin[arfA] - Sin[f]*Cos[q2]*Cos[arfA])*
Cos[w*t] - (Sin[f]*Sin[q]*Sin[arfA] +
Cos[f]*Sin[q]*Cos[q2]*Cos[arfA] + Cos[q]*Sin[q2]*Cos[arfA])*
Sin[w*t]) +
bz3*((Sin[f]*Cos[q2]*Cos[arfA] - Cos[f]*Sin[arfA])*
Sin[w*t] - (Sin[f]*Sin[q]*Sin[arfA] +
Cos[f]*Sin[q]*Cos[q2]*Cos[arfA] + Cos[f]*Sin[q2]*Cos[arfA])*
Cos[w*t]) , bsz ==
bx3*(Sin[q]*Cos[q2] + Cos[f]*Cos[q]*Sin[q2]) +
by3*((Cos[q]*Cos[q2] - Cos[f]*Sin[q]*Sin[q2])*Sin[w*t] -
Sin[f]*Sin[q2]*Cos[w*t]) +
bz3*(Sin[f]*Sin[q2]*
Sin[w*t] + (Cos[q]*Cos[q2] - Cos[f]*Sin[q]*Sin[q2])*
Cos[w*t])}, {bx3, by3, bz3}]运行后结果为{{bx3 -> 67.2591 - 1.83737 by3 + 9.6786 , bz3}}没有解出来。运行如图:麻烦达人帮忙运行一下,看看问题出在什么地方,并且改正,不胜感谢。 展开
q = 90 Degree;
arfA = 300 Degree;
q2 = 31 Degree;
w = 17;
bsx = 30;
bsy = 12;
bsz = -10;
t = 0.09;
NSolve[{bsx ==
bx3*(Cos[f]*Cos[q]*Cos[q2]*Sin[arfA] - Sin[q]*Sin[q2]*Sin[arfA] -
Sin[f]*Cos[q]*Cos[arfA]) +
by3*((Sin[f]*Sin[q]*Cos[arfA] - Cos[f]*Sin[q]*Cos[q2]*Sin[arfA] -
Cos[q]*Sin[q2]*Sin[arfA])*
Sin[w*t] - (Sin[f]*Cos[q2]*Sin[arfA] + Cos[f]*Cos[arfA])*
Cos[w*t]) +
bz3*((Sin[f]*Sin[q]*Cos[arfA] - Cos[f]*Sin[q]*Cos[q2]*Sin[arfA] -
Cos[q]*Sin[q2]*Sin[arfA])*
Cos[w*t] + (Sin[f]*Cos[q2]*Sin[arfA] + Cos[f]*Cos[arfA])*
Sin[w*t]) , bsy ==
bx3*(Cos[f]*Cos[q]*Sin[arfA] + Cos[f]*Cos[q2]*Cos[arfA] -
Sin[q]*Sin[q2]*Cos[arfA]) +
by3*((Cos[f]*Sin[arfA] - Sin[f]*Cos[q2]*Cos[arfA])*
Cos[w*t] - (Sin[f]*Sin[q]*Sin[arfA] +
Cos[f]*Sin[q]*Cos[q2]*Cos[arfA] + Cos[q]*Sin[q2]*Cos[arfA])*
Sin[w*t]) +
bz3*((Sin[f]*Cos[q2]*Cos[arfA] - Cos[f]*Sin[arfA])*
Sin[w*t] - (Sin[f]*Sin[q]*Sin[arfA] +
Cos[f]*Sin[q]*Cos[q2]*Cos[arfA] + Cos[f]*Sin[q2]*Cos[arfA])*
Cos[w*t]) , bsz ==
bx3*(Sin[q]*Cos[q2] + Cos[f]*Cos[q]*Sin[q2]) +
by3*((Cos[q]*Cos[q2] - Cos[f]*Sin[q]*Sin[q2])*Sin[w*t] -
Sin[f]*Sin[q2]*Cos[w*t]) +
bz3*(Sin[f]*Sin[q2]*
Sin[w*t] + (Cos[q]*Cos[q2] - Cos[f]*Sin[q]*Sin[q2])*
Cos[w*t])}, {bx3, by3, bz3}]运行后结果为{{bx3 -> 67.2591 - 1.83737 by3 + 9.6786 , bz3}}没有解出来。运行如图:麻烦达人帮忙运行一下,看看问题出在什么地方,并且改正,不胜感谢。 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询