data.train <- matrix(c( 0,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9,1,1.1,1.2,1.3,1.4,1.5,1.6,1.7,1.8,1.9,2,
                      1, 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
                      0.04,0.423,0.927,1.377,1.641,1.66,1.461,
                      1.134,0.799,0.566,0.5,0.607,0.835,1.099,1.307,
                      1.396,1.345,1.182,0.969,0.781,0.68), ncol = 3, byrow = FALSE)