print.bsrr {bestridge} | R Documentation |
Print the primary elements of the "bsrr
" object.
## S3 method for class 'bsrr'
print(x, digits = max(5, getOption("digits") - 5), nonzero = FALSE, ...)
x |
A " |
digits |
Minimum number of significant digits to be used. |
nonzero |
Whether the output should only contain the non-zero coefficients. |
... |
additional print arguments |
prints the fitted model and returns it invisibly.
No return value, called for side effect
Liyuan Hu, Kangkang Jiang, Yanhang Zhang, Jin Zhu, Canhong Wen and Xueqin Wang.
# Generate simulated data
n = 200
p = 20
k = 5
rho = 0.4
seed = 10
Tbeta <- rep(0, p)
Tbeta[1:k*floor(p/k):floor(p/k)] <- rep(1, k)
Data = gen.data(n, p, k, rho, family = "gaussian", beta = Tbeta, seed=seed)
lambda.list = exp(seq(log(5), log(0.1), length.out = 10))
lm.bsrr = bsrr(Data$x, Data$y, lambda.list = lambda.list, method = "sequential")
print(lm.bsrr)