lamest {fastliu} | R Documentation |
Computation of Liu Tuning Parameter
Description
lamest
computes the Liu tuning parameters provided in the literature.
The tuning parameter estimates are based on
Liu (1993) doi:10.1080/03610929308831027,
Ozkale and Kaciranlar (2007) doi:10.1080/03610920601126522,
Liu (2011) doi:10.1016/j.jspi.2010.05.030.
Usage
lamest(obj, ...)
Arguments
obj |
An object of class |
... |
Not used in this implemetation. |
Details
The lamest
function computes the following tuning
parameter estimates available in the literature.
lam.mm (Liu, 1993) |
|
lam.CL (Liu, 1993) |
|
lam.opt (Liu, 1993) |
|
lam.OK (Ozkale and Kaciranlar, 2007; Liu, 2011) | with and where and are the th diagonal elements of and , respectively. |
lam.GCV | This is the value corresponding to the minimum of the generalized cross-validition (GCV) values. The GCV is computed by where is the residual sum of squares and is the trace of the hat matrix at corresponding value of from Liu regression. |
Value
The return object is the Liu tuning parameter estimates based on the literature.
Author(s)
Murat Genç and Ömer Özbilen
References
Liu, K. (1993). A new class of blased estimate in linear regression. Communications in Statistics-Theory and Methods, 22(2), 393-402. doi:10.1080/03610929308831027.
Liu, X. Q. (2011). Improved Liu estimator in a linear regression model. Journal of Statistical Planning and Inference, 141(1), 189-196. doi:10.1016/j.jspi.2010.05.030.
Ozkale, M. R. and Kaciranlar, S. (2007). A prediction-oriented criterion for choosing the biasing parameter in Liu estimation. Communications in Statistics-Theory and Methods, 36(10), 1889-1903. doi:10.1080/03610920601126522. Imdadullah, M., Aslam, M., and Altaf, S., (2017). liureg: A Comprehensive R Package for the Liu Estimation of Linear Regression Model with Collinear Regressors. The R Journal, 9(2), 232-247.
See Also
liureg()
, predict()
, summary()
, pressliu()
, residuals()
Examples
Hitters <- na.omit(Hitters)
X <- model.matrix(Salary ~ ., Hitters)[, -1]
y <- Hitters$Salary
lam <- seq(0, 1, 0.01)
liu.mod <- liureg(X, y, lam)
lamest(liu.mod)