# NOT RUN {
# simulate data with N=100 (sample size) and 23 predictors; 4 informative and 20 noise
set.seed(14)
beta <- c(3, 2, -1.6, -4)
noise <- 5
N <- 100
simData <- SimData(N=N, beta=beta, noise=noise, corr=FALSE)
# }
Run the code above in your browser using DataLab