# NOT RUN {
p = 30
beta = c(1, -0.8, 0.6, 0, 0, -1.5, -0.5, 1.2)
beta = c( beta, rep(0, times = p - length(beta)) )
Data = comp_Model(n = 50, p = p, intercept = FALSE,
rho = 0.2, sigma = 0.5, gamma = 0.5, add.on = 1:5,
beta = beta)
# }
Run the code above in your browser using DataLab