coef.joinet.Rd 856 Bytes
Newer Older
Armin Rauschenberger's avatar
Armin Rauschenberger committed
1 2
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/functions.R
Armin Rauschenberger's avatar
Armin Rauschenberger committed
3 4
\name{coef.joinet}
\alias{coef.joinet}
Armin Rauschenberger's avatar
Armin Rauschenberger committed
5 6
\title{Extract Coefficients}
\usage{
Armin Rauschenberger's avatar
Armin Rauschenberger committed
7
\method{coef}{joinet}(object, ...)
Armin Rauschenberger's avatar
Armin Rauschenberger committed
8 9
}
\arguments{
Armin Rauschenberger's avatar
Armin Rauschenberger committed
10
\item{object}{\link[joinet]{joinet} object}
Armin Rauschenberger's avatar
Armin Rauschenberger committed
11 12 13

\item{...}{further arguments (not applicable)}
}
Armin Rauschenberger's avatar
Armin Rauschenberger committed
14 15 16 17 18 19 20
\value{
This function returns the pooled coefficients.
The slot \code{alpha} contains the intercepts
in a vector of length \eqn{q},
and the slot \code{beta} contains the slopes
in a matrix with \eqn{p} rows (inputs) and \eqn{q} columns.
}
Armin Rauschenberger's avatar
Armin Rauschenberger committed
21 22
\description{
Extracts pooled coefficients.
Armin Rauschenberger's avatar
Armin Rauschenberger committed
23 24
(The meta learners linearly combines
the coefficients from the base learners.)
Armin Rauschenberger's avatar
Armin Rauschenberger committed
25 26
}
\examples{
Armin Rauschenberger's avatar
Armin Rauschenberger committed
27
n <- 50; q <- 3; p <- 100
Armin Rauschenberger's avatar
Armin Rauschenberger committed
28
X <- matrix(rnorm(n*p),nrow=n,ncol=p)
Armin Rauschenberger's avatar
Armin Rauschenberger committed
29
Y <- replicate(n=q,expr=rnorm(n=n,mean=rowSums(X[,1:5])))
Armin Rauschenberger's avatar
Armin Rauschenberger committed
30
object <- joinet(Y=Y,X=X)
Armin Rauschenberger's avatar
Armin Rauschenberger committed
31 32 33
coef <- coef(object)

}