用Mathematica画红心

1 我用的是M9，资源下载地址：http://hi.baidu.com/unreal3/item/d69c5938c5d1e9403175a116

2 安装好后，新建一个程序包（文件》新建》程序包），然后可以在编辑框中输入函数命令，点击右上角“运行程序包”即可运行。

3 关于红心图形（二维和三维）以及浪漫的故事，可以参见下面两篇文章：

http://www.zhihu.com/question/21239607?utm_source=weekly-digest&utm_medium=email&utm_campaign=weekly88

http://www.mathematische-basteleien.de/heart.htm

4 mathematica里面ContourPlot3D函数可以画三维的包络面，用知乎中提供的公式，画出了下面的图形：

5 更多mathematica绘图参考资料：

http://xuxzmail.blog.163.com/blog/static/251319162010714112840593/

http://reference.wolfram.com/mathematica/guide/Mathematica.html