powered by
fitLinear(X, y)
set.seed(1) n <- 100 M <- 10 X <- matrix(rnorm(M*n), ncol=M) y <- X[, 2] - X[, 3] + X[, 6] - X[, 10] + rnorm(n) fitLinear(X, y)
Run the code above in your browser using DataLab