Wolfram
Mathematica
8의 신기능: 새롭게 향상된 핵심 알고리즘
◄
이전
|
다음
►
핵심 알고리즘
조건에 부합하는 솔루션을 이용한 연산
솔루션 세트는 12 개의 솔루션으로 구성되어 있으며 각각의 해는 x가 특정 부등식의 조건을 만족하는 경우에만 유효합니다.
Solve
는 솔루션과 함께
ConditionalExpression
개체가 나타내는 유효한 조건을 줍니다.
In[1]:=
X
f = -x^11 + x^12 + 55 x^9 y^2 + 6 x^10 y^2 - 330 x^7 y^4 + 15 x^8 y^4 + 462 x^5 y^6 + 20 x^6 y^6 - 165 x^3 y^8 + 15 x^4 y^8 + 11 x y^10 + 6 x^2 y^10 + y^12; sol = y /. Solve[f == 0, y, Reals]; Plot[Tooltip[sol], {x, -1, 1}, Exclusions -> {Discriminant[f, y] == 0}, PlotPoints -> 300, AspectRatio -> 1, Axes -> False]
Out[1]=
