幾何学的問題を多項式系として解く
多項不等式によって与えられるの立体の直径を求める.
In[1]:= | ![]() X |
Out[1]= | ![]() |
範囲を可視化する.
In[2]:= | ![]() X |
Out[2]= | ![]() |
ℛ の境界上の2点間の距離の極大値に対する必要条件を式にする.
In[3]:= | ![]() X |
Out[3]= | ![]() |
NSolveを使って,条件を満足するペアを求める.
In[4]:= | ![]() X |
ℛ の直径を求める.
In[5]:= | ![]() X |
Out[5]= | ![]() |
最大距離を実現する,異なるペアを見付ける.
In[6]:= | ![]() X |
Out[6]= | ![]() |
結果を可視化する.
Out[7]= | ![]() |