就是让曲线的交点发生颜色变化,而且相交的次数的不同,颜色也不同。
一下是代码:
In[10]:= ToPolarCoordinates[{x, y}]
Out[10]= {Sqrt[x^2 + y^2], ArcTan[x, y]}
In[11]:= L[x_] := 1 - Cos[2 Pi x]
In[12]:= DB[x_] := Sin[2 Pi x]
In[13]:= F[x_] := Sqrt[L[x]^2 + DB[x]^2]
In[14]:= T[x_] := Tan[Pi/180] x
In[15]:= Y[x_] := Sqrt[F[x]^2 + T[x]^2]
In[25]:= PolarPlot[Y[x], {x, 0, 360}]
一下是代码:
In[10]:= ToPolarCoordinates[{x, y}]
Out[10]= {Sqrt[x^2 + y^2], ArcTan[x, y]}
In[11]:= L[x_] := 1 - Cos[2 Pi x]
In[12]:= DB[x_] := Sin[2 Pi x]
In[13]:= F[x_] := Sqrt[L[x]^2 + DB[x]^2]
In[14]:= T[x_] := Tan[Pi/180] x
In[15]:= Y[x_] := Sqrt[F[x]^2 + T[x]^2]
In[25]:= PolarPlot[Y[x], {x, 0, 360}]