画一个大苹果🍎

参数方程如下

{x=cos⁡(u)(cos⁡(v)+1)+0.085cos⁡(5u)y=(1+cos⁡(u))sin⁡(u)z=−0.7log⁡(1−vπ)+6sin⁡(v)+2cos⁡(v) \begin{cases} x=\cos (u) (\cos (v)+1)+0.085 \cos (5 u) \\ y = (1 + \cos (u)) \sin(u)\\ z=-0.7 \log \left(1-\frac{v}{\pi }\right)+6 \sin (v)+2 \cos (v) \end{cases}

u,v∈[−π,π]u,v\in [-\pi ,\pi ]

Mathematica代码

1
2
3
4
5
ParametricPlot3D[{(1 + Cos[v]) Cos[u] + 
   0.085 Cos[5 u], (1 + Cos[v]) Sin[u], 
  6 Sin[v] + 2 Cos[v] - 
   0.7 Log[1 - v/\[Pi]]}, {u, -\[Pi], \[Pi]}, {v, -\[Pi], \[Pi]}, 
 Mesh -> None, BoxRatios -> 1, PlotStyle -> Red]

鲜美好吃的苹果就完成了！🍎