示例：

a<- sub("Min.   :|1st Qu.:|Median :|Mean   :|3<sup>rd</sup> Qu.:|Max.   :","",summary(data))

a[1:6]对应的值分别为：Min. 1st Qu.  Median    Mean 3rd Qu.    Max

参考资料：

http://bbs.pinggu.org/thread-2540505-1-1.html