source("readonly.r")
e.lrn <- y.lrn - mean(y.lrn) 
e.val <- y.val - mean(y.lrn)        
e.tst <- y.tst - mean(y.lrn)
mse.lrn <- sum(e.lrn^2)/n.lrn 
mse.val <- sum(e.val^2)/n.val  
mse.tst <- sum(e.tst^2)/n.tst
print(mse.lrn) 
print(mse.val) 
print(mse.tst)