之所以一直这么喜欢mathematica，实在是与其强大的功能，迅速的可视化效果相关，有时做一件事情，面对的只是一次任务，并不需要将其流程化自动化，快速地实现是最重要的。 接着上次谈mathematica中的关于几种图形的画法。最近读集异璧，一直希望将其中的一些内容使用mathematica实现出来，比如第五章递归过程中关于费波那契数列的扩展。最近希望使用mathematica将之实现并能够推导出来。当然现在能力还力有不逮。 所谓力有不逮，就是别人告诉我一件事情，我有能力去跟着他做，但是自己有一个想法，还完全不能一丝不差地将之实现。 今天尝试想将费波那契堆画出来，最后画出这么样的效果 图1 这是使用LayeredGraphPlot的画法，而如果使用GraphPlot，则出显示出这样的结果： 图2

接着上次讨论的图像画法来说。 上次的那个函数 其中的数字为图的结点(node)，而map定义一个匿名函数，并将此匿名函数映射到GraphPlot、GraphPlot3D、LayeredGraphPlot、TreePlot四个函数，这四个函数均为做图函数，从而画上前述的图形。 在这个函数中，还有几个点没有讨论到，首先是四个函数GraphPlot、GraphPlot3D、LayeredGraphPlot、TreePlot为什么要写在大括号的大括号内，大括号是mathematica中所谓的list数据类型，而在这里，大括号的写法，影响的最终图像的排布方式。 改变这大括号的排布方式，有如下的结果： 最后得到这样图像 而这种排布，