# NOT RUN {
set.seed(43)
n = 50
p = 10
sigma = 0.2
lam = 0.5
X = matrix(rnorm(n*p), n, p)
X = scale(X, TRUE, TRUE) / sqrt(n-1)
beta = c(3,2,rep(0,p-2))
y = X%*%beta + sigma*rnorm(n)
result = randomizedLasso(X, y, lam)
inf_result = randomizedLassoInf(result)
# }
Run the code above in your browser using DataLab