再后来， Hans Rosling将这款数据展示产品卖给了Google，而Google又将其整合到Visualisation API 里，于是我们可以调用Google的API来使用这些有趣的图形展示功能。

更令人鼓舞的是：前不久，Markus Gesmann, Castillo两位老大，写了googleVis这个R扩展包，将Hans Rosling的泡泡图同R语言完美的整合在了一起:)

下面就是在R语言里，通过googleVis包，对我国2006年至今的货币供应量（M0、M1、M2）Motion Chart（将横坐标设置为time以后，点击Play）

碎碎念：从泡泡的跳动上看，央行投放的货币供应量（亿元）在2009-2011年间，增加的最为剧烈，当然这个时间段也是房价近十年间增长最为迅速的两年。而现在呢，房市开始限购，国内房地产市场已经撑不住超发的货币，因此广泛的通货膨胀开始蔓延。引用郎咸平的几段话：

我们近几年发了76.5万亿的货币,是GDP的2.5倍,而美国的货币量除上GDP只是0.6,只有我们的四分之一

唯一的解释只能是货币的购买力在下降,这就是经济学里的通货膨胀

最后，关于googleVis包的使用请移步至这里。

相关文章：

• 用R实现马赛克拼图
• R语言的代码规范
• 数据挖掘之R与SQL

数据是这样的

最后的图形是这样的：

Excel2007不是很熟，不评论。对比R实现的结果及方式：

代码共11行，细节见这里

相关文章：

• 2006年至今国内货币供应量的Motion Chart
• 用R实现马赛克拼图
• 2008年的日出与日落

三天前，itux 在统计之都论坛上问到了如何做 Matrix67 博客上的平滑马赛克图，我是好事之徒，颠颠地跑去瞧了一眼。恩，蛮有意思的，而且非常黄，非常暴力！但比较悲剧的是我不会用Mathematica，只好用R实现了一下。

本来想标题改的彪悍一些——《一千二百个女人和我的故事》，想想还是算了吧，虽说是用了1200个漂亮女人组成了我的头像，但她们我一个也不认识，哈哈。

用的原图我就不贴了，实际上我是戴着眼镜的，马赛克平滑以后，不明显了。

最后是代码。非常简单，不到20行。大概所需要的时间：构思写代码1个小时，下载和整理图片时间长点，3个多小时（当然你本地资源和Matrix67一样丰富的话另说，哈）。

相关文章：

• 2006年至今国内货币供应量的Motion Chart
• 数据挖掘之R与SQL
• 一个美丽的三角形