Mathematica 解方程组半天解不出来,有没有看哈原因的,求赐教 5
e1={e11,e12,e13};e2={e21,e22,e23};t1=e11^2*l1+e12^2*l2+e13^2*l3==at2=e11*e21*l1+e12*e...
e1 = {e11, e12, e13};
e2 = {e21, e22, e23};
t1 = e11^2*l1 + e12^2* l2 + e13^2* l3 == a
t2 = e11 *e21* l1 + e12 *e22 *l2 + e13 *e23 *l3 == c/2
t3 = e11 *e12* e23* (l1 - l2) + e12 *e13 *e21 *(l2 - l3) +
e11 *e13 *e22* (-l1 + l3) == d/2
t4 = e21^2 *l1 + e22^2 *l2 + e23^2 *l3 == b
t5 = e13 *e21 *e22 *(-l1 + l2) + e12 *e21 *e23 *(l1 - l3) +
e11 *e22 *e23* (-l2 + l3) == e/2
t6 = (e13* e22 - e12* e23)^2* l1 + (e13 *e21 - e11 *e23)^2 *
l2 + (e12* e21 - e11* e22)^2* l3 == f
t7 = Dot[e1, e2] == 0
t8 = Dot[e1, e1] == 1
t9 = Dot[e2, e2] == 1
Solve[{t1, t2, t3, t4, t5, t6, t7, t8, t9}, {e11, e12, e13, e21, e22,
e23}] 展开
e2 = {e21, e22, e23};
t1 = e11^2*l1 + e12^2* l2 + e13^2* l3 == a
t2 = e11 *e21* l1 + e12 *e22 *l2 + e13 *e23 *l3 == c/2
t3 = e11 *e12* e23* (l1 - l2) + e12 *e13 *e21 *(l2 - l3) +
e11 *e13 *e22* (-l1 + l3) == d/2
t4 = e21^2 *l1 + e22^2 *l2 + e23^2 *l3 == b
t5 = e13 *e21 *e22 *(-l1 + l2) + e12 *e21 *e23 *(l1 - l3) +
e11 *e22 *e23* (-l2 + l3) == e/2
t6 = (e13* e22 - e12* e23)^2* l1 + (e13 *e21 - e11 *e23)^2 *
l2 + (e12* e21 - e11* e22)^2* l3 == f
t7 = Dot[e1, e2] == 0
t8 = Dot[e1, e1] == 1
t9 = Dot[e2, e2] == 1
Solve[{t1, t2, t3, t4, t5, t6, t7, t8, t9}, {e11, e12, e13, e21, e22,
e23}] 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询