地图的球面投影方法，在Mathematica里面，比较常见的有151中。那么，本文就试图通过一组代码，让读者能比较容易的查看这151种球面投影的效果。下图是151中球面投影的动态图，共151帧，每一帧持续3.6秒。
工具/原料
1
电脑
2
Mathematica
方法/步骤
1
首先，给出一个自定义函数：投影[方法_]:=……其中，投影是函数，方法是自变量。
2
那么，球面投影的方法都有哪一些呢？下图中的ff，就把所有的151个方法，集合到一起来了。
3
用第6个方法，进行投影，效果如下图。
4
可以用Manipulate，把151个方法串联起来，读者可以逐个查阅。
5
用ImageCollage，可以自动把这151个图片排版在一起，效果如下。
6
把图片一个接一个排起来，可以制成文首的那个动态图：Export['D:\\我的图片\\0.gif', Table[投影[ff[[n]]], {n, 1, 151, 1}]]
注意事项
地图的投影方法，除了球面投影，还有其他的投影方法，这里就不去枚举了。