yyfish87
幼苗
共回答了19个问题采纳率:84.2% 举报
你只需将所有的1.5改成3/2即可.3/2是一个精确数字.而1.5系统认为是近似数.
In[1]:= r =.;
a =.; Solve[{-3*x + a*Sqrt[3/2]*y^2 +
3/2*x*(2*x^2 + r*(1 - x^2 - y^2)) ==
0,-a*Sqrt[3/2]*x*y + 3/2*y*(2*x^2 + r*(1 - x^2 - y^2)) == 0},{x,
y}]
Out[2]= {{y -> 0,x -> -1},{y -> 0,x -> 0},{y -> 0,
x -> 1},{y -> -(Sqrt[6 - a^2]/Sqrt[6]),
x -> a/Sqrt[6]},{y -> Sqrt[6 - a^2]/Sqrt[6],
x -> a/Sqrt[6]},{y -> -Sqrt[(3/2)] Sqrt[(2 r)/a^2 - r^2/a^2],
x -> (Sqrt[3/2] r)/a},{y -> Sqrt[3/2] Sqrt[(2 r)/a^2 - r^2/a^2],
x -> (Sqrt[3/2] r)/a}}
1年前
10