| olasso_path {natural} | R Documentation |
Fit a linear model with organic lasso
Description
Calculate a solution path of the organic lasso estimate (of error standard deviation) with a list of tuning parameter values. In particular, this function solves the squared-lasso problems and returns the objective function values as estimates of the error variance:
\tilde{\sigma}^2_{\lambda} = \min_{\beta} ||y - X \beta||_2^2 / n + 2 \lambda ||\beta||_1^2.
Usage
olasso_path(x, y, lambda = NULL, nlam = 100, flmin = 0.01,
thresh = 1e-08, intercept = TRUE)
Arguments
x |
An |
y |
A response vector of size |
lambda |
A user specified list of tuning parameter. Default to be NULL, and the program will compute its own |
nlam |
The number of |
flmin |
The ratio of the smallest and the largest values in |
thresh |
Threshold value for underlying optimization algorithm to claim convergence. Default to be |
intercept |
Indicator of whether intercept should be fitted. Default to be |
Details
This package also includes the outputs of the naive and the degree-of-freedom adjusted estimates, in analogy to nlasso_path.
Value
A list object containing:
nandp:The dimension of the problem.
lambda:The path of tuning parameter used.
a0:Estimate of intercept. A vector of length
nlam.beta:Matrix of estimates of the regression coefficients, in the original scale. The matrix is of size
pbynlam. Thej-th column represents the estimate of coefficient corresponding to thej-th tuning parameter inlambda.sig_obj_path:Organic lasso estimates of the error standard deviation. A vector of length
nlam.sig_naive:Naive estimate of the error standard deviation based on the squared-lasso regression. A vector of length
nlam.sig_df:Degree-of-freedom adjusted estimate of the error standard deviation, based on the squared-lasso regression. A vector of length
nlam.type:whether the output is of a natural or an organic lasso.
See Also
Examples
set.seed(123)
sim <- make_sparse_model(n = 50, p = 200, alpha = 0.6, rho = 0.6, snr = 2, nsim = 1)
ol_path <- olasso_path(x = sim$x, y = sim$y[, 1])