| 2008/08/05(Tue) 07:57:51 編集(投稿者)
■No34822に返信(dさんの記事) > ■No34759に返信(dさんの記事) > >>多様な発想で解けます >>参考まで; >> > たとえば > 添付のように、2次超曲面にも通じる、主軸問題として > 固有空間を求め。 >
In[7]:= eqn = {λ*D[f[x, y], x] == D[g[x, y], x], λ*D[f[x, y], y] == D[g[x, y], y], g[x, y] == 0}
Out[7]= {2*x*λ == 42*x + 10*Sqrt[3]*y, 2*y*λ == 10*Sqrt[3]*x + 62*y, -144 + 21*x^2 + 10*Sqrt[3]*x*y + 31*y^2 == 0}
In[8]:= soln = Solve[eqn, {x, y, λ}]
Out[8]= {{λ -> 16, x -> -((3*Sqrt[3])/2), y -> 3/2}, {λ -> 16, x -> (3*Sqrt[3])/2, y -> -(3/2)}, {λ -> 36, x -> -1, y -> -Sqrt[3]}, {λ -> 36, x -> 1, y -> Sqrt[3]}} ----------------------------------- なる 発想 でも 固有値、固有vector,達が求められます。
|