稀奇古怪的函数图像，一辈子见一次就够了

天山草@

【20】如同流体

天山草@

【21】括号函数

天山草@

【22】半括号函数

天山草@

【23】用函数画鸡蛋

天山草@

【24】画标准鸡蛋

\(4\sqrt{(x-1.65)^2+y^2}+3\sqrt{(x+1.65)^2+y^2}=4^2\)





这个鸡蛋是用 mathematica 画的，程序代码如下：

1. m = 4; n = 3; a = 1.5; k = 4;
   
2. ContourPlot[
   
3. m Sqrt[(x - a)^2 + y^2] + n Sqrt[(x + a)^2 + y^2] == k^2, {x, -4,
   
4.   4}, {y, -4, 4}]

复制代码

denglongshan

精彩，用Mathematica画出来的？

天山草@

【25】画一颗立体心

\( (x^2 + \frac{9}{4} y^2 + z^2 - 1)^3 - x^2 z^3 -\frac{9}{80} y^2 z^3 = 0\)




这个心是用 mathematica 画的，程序代码如下：

1. m = 1.5; ContourPlot3D[(x^2 + 9/4 y^2 + z^2 - 1)^3 - x^2 z^3 -
   
2.    9/80 y^2 z^3 == 0, {x, -m, m}, {y, -m, m}, {z, -m, m},
   
3. Axes -> False, Boxed -> False, Lighting -> "Neutral",
   
4. ContourStyle -> Red]

复制代码

天山草@

【26】立体刺球

\(x cos((y+z)^2)+ycos((z+x)^2)
+z cos((x+y)^2)+x^2+y^2+z^2=16 \)




此图是网友用 rhino 软件画的。用 mathematica 画出来效果差太多。

如果把方程右边的 16 改成 64，画出来的球更精细好看。但是图片占内存超过 500K，发不上来。

永远

天山草@ 发表于 2021-2-28 20:18
【25】画一颗立体心

\( (x^2 + \frac{9}{4} y^2 + z^2 - 1)^3 - x^2 z^3 -\frac{9}{80} y^2 z^3 = 0\)

请问楼主：【25】画一颗立体心用啥软件画的，代码又是多少，可否告之

白新岭

厉害了👍