Extracts pooled coefficients. (The meta learners linearly combines the coefficients from the base learners.)
# S3 method for joinet
coef(object, ...)joinet object
further arguments (not applicable)
This function returns the pooled coefficients.
The slot alpha contains the intercepts
in a vector of length \(q\),
and the slot beta contains the slopes
in a matrix with \(p\) rows (inputs) and \(q\) columns.
# \dontshow{
if(!grepl('SunOS',Sys.info()['sysname'])){
n <- 50; p <- 100; q <- 3
X <- matrix(rnorm(n*p),nrow=n,ncol=p)
Y <- replicate(n=q,expr=rnorm(n=n,mean=rowSums(X[,1:5])))
object <- joinet(Y=Y,X=X)
coef <- coef(object)}# }
if (FALSE) {
n <- 50; p <- 100; q <- 3
X <- matrix(rnorm(n*p),nrow=n,ncol=p)
Y <- replicate(n=q,expr=rnorm(n=n,mean=rowSums(X[,1:5])))
object <- joinet(Y=Y,X=X)
coef <- coef(object)}