# NOT RUN {
set.seed(3)
n = 50
b = c(4,3,1,0)
p = length(b)
x = matrix(rnorm(n*p),nrow = n)
sigma = 5
y = x %*% b + sigma * rnorm(n, 0, 1)
path1 = orderedLasso.path(x,y, intercept = FALSE,
method = "Solve.QP", strongly.ordered = TRUE)
plot(path1)
print(path1)
# }
Run the code above in your browser using DataLab