used lasso regression

largest MSE

used ridge regression

40*100, times=100

seq <- (0.1, 0.5, 0.1) num <- (5, 25, 5)

row<-40 col<-100 num<-seq(5,25,5) str<-seq(0.1,0.5,0.1)