※ 引述《jurian0101 (Hysterisis)》之铭言：
: ※ 引述《huarache (~絮~)》之铭言：
: : http://ppt.cc/5xVl
: : 我想要跟书上一样求得的s3可以是arctan型式
: : 然后r3求得的结果也想跟书上一样
: : 不知道Mathematica能否算出一样的结果呢?
: : 小弟我自己是 Solve[{r2 Cos[s2] - r3 Cos[s3] == 0,
: : r1 + r2 Sin[s2] - r3 Sin[s3] == 0}, {s2, s3}]
: : 跑出一大堆的结果都不是我要的
: : 然后如果只求s3，只会跑出{}
: : 还烦请高手帮小弟我解惑，谢谢!
同书上第6式
我在MMA打了eqn3 = (r4 Cos[s4] + r5 Cos[s5] - r6 Cos[s6] - r7 Cos[s7] == 0)
eqn4 = (r4 Sin[s4] + r5 Sin[s5] - r6 Sin[s6] - r7 Sin[s7] == 0)
eqn3 /. {s4 -> s3, s6 -> 0, s7 -> \[Pi]/2}
eqn4 /. {s4 -> s3, s6 -> 0, s7 -> \[Pi]/2}
为什么跑出来就只有eqn3，eqn4
我上面输入的eqn1，eqn2没有这个问题
谢谢!