优秀是一种习惯

更新了一下corrplot包，变动如下：

1.  解决了之前的一些小bug，并且把原来的一些for()循环用*apply函数重写了一下。
2. 增加了corr.rect()函数，可以在相关阵的图上面框框，类似于谱系图上面的那种矩形，即将原来的多个变量分为n类。这两种图（见图1、图2）可以好好比较一下，各有特点。
3. 在原先的corrpot()函数中，当排序方式为系统聚类时，可以根据聚类结果直接加框框，具体由rect.hc, rect.col, rect.lwd三个参数控制。当然，也可以在图画完之后，用corr.rect()函数再加，只不过方便性上打了折扣。

目前，CRAN主页上新版已经出炉，国内中科院的两个镜像还没有同步，大约得半天左右吧(香港那个镜像早已废弃)。此外，WINDOWS下默认的图形设备在绘制png等非矢量格式图时，效果欠佳，建议用Cairo包或者cairoDevice包来生成质量较高的png图片。

图 1 corrplot画出来的

图1代码如下：

corrplot(cor(mtcars), order="hclust", rect.hc = 3)

图2 传统的聚类谱系图，可以与图1好好比较一番

图3 二者之联姻，和heatmap有些相似

corrplot包的其他问题：

1. DESCRIPTION文件里面的suggests package里面不小心加了个rgl包，悲剧悲剧。
2. corrplot()函数参数过多，现在是38个左右，很多时候我自己都要返回去看看参数意义，显得比较累赘。
3. 变量的文本标签的计算方法不太好，有时得多次调解cex参数，比较麻烦，这个是个比较大的问题。
4. 之前，准备多做做变量排序的事情，后来发现seriation包已经做得非常好了，其中一位作者Kurt还是R core之一，每次提交package时，几乎都是他把关。corrplot包的定位还是轻量级，在维数<50的时候娱乐娱乐。

欢迎广大朋友批评指正。