R语言标准化(归一化)之scale()函数、sweep()函数
#数据集x<-cbind(c(1,2,3,4),c(5,5,10,20),c(3,6,9,12))#自己写标准化x_min_temp<-apply(x,2,min)x_min<-matrix(rep(x_min_temp,4),byrow=TRUE,ncol=3)#需要输入行数和列数abs(x-x_min)#当前值减去均值x_extreme_temp&l...