# NOT RUN {
# use the diabetes dataset from "lars" package
data(diabetes)
y <- diabetes$y
# with quadratic terms
x2 <- cbind(diabetes$x1,diabetes$x2)
object <- sealasso(x2, y, "sealasso")
summary(object)
# }
Run the code above in your browser using DataLab