# 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)
cvmodel = orderedLasso.cv(x,y, intercept = FALSE, trace = TRUE,
method = "Solve.QP", strongly.ordered = TRUE)
print(cvmodel)
plot(cvmodel)
# }
Run the code above in your browser using DataLab