R语言数据最大最小归一化

lmdata1 <- data.matrix(lmdata)

center <- sweep(lmdata1, 2, apply(lmdata1, 2, min),'-')

R <- apply(lmdata1, 2, max) - apply(lmdata1,2,min)   

lmdata2<- sweep(center, 2, R, "/")       

lmdata2 <- data.frame(lmdata2)

你可能感兴趣的:(R)