随机构建一个100*20的矩阵矩阵由数字浮点型组成，保留小数点后2位（如1.34）寻找矩阵中均值最大的列和方差最大的列寻找矩阵中最大的两个数值及其坐标位置（具体到几行几列）计算每两列之间的相关性，对相关性最高的两对列，保留其中的一列（根据列的中值进行判断，保留中值较大的那列，见右图）对行的方差进行排序，去除方差最小的5行
下面是我写的x<-runif(2000)round(x,2)a<-matrix(x,100,20)y1<-max(colMeans(a))