View source: R/predict.gllvm.R
predict.gllvm | R Documentation |
Obtains predictions from a fitted generalized linear latent variable model object.
## S3 method for class 'gllvm'
predict(
object,
newX = NULL,
newTR = NULL,
newLV = NULL,
type = "link",
level = 1,
offset = TRUE,
...
)
object |
an object of class 'gllvm'. |
newX |
A new data frame of environmental variables. If omitted, the original matrix of environmental variables is used. |
newTR |
A new data frame of traits for each response taxon. If omitted, the original matrix of traits is used. |
newLV |
A new matrix of latent variables. If omitted, the original matrix of latent variables is used. Note that number of rows/sites must be the same for |
type |
the type of prediction required. The default ( |
level |
specification for how to predict. Level one ( |
offset |
specification whether of not offset values are included to the predictions in case they are in the model, defaults to |
... |
not used. |
If newX
, newTR
and newLV
are omitted the predictions are based on the data used for fitting the model. Notice that newTR
need to match with the number of species in the original data.
Instead, new sites can be specified in newX
. If predictors newX
(and newTR
) are given, and newLV
is not, latent variables are not used in the predictions.
A matrix containing requested predictor types.
Jenni Niku <jenni.m.e.niku@jyu.fi>, David Warton
# Load a dataset from the mvabund package
data(antTraits)
y <- as.matrix(antTraits$abund)
X <- scale(antTraits$env[, 1:3])
# Fit gllvm model
fit <- gllvm(y = y, X, family = poisson())
# fitted values
predfit <- predict(fit, type = "response")
# linear predictors
predlin <- predict(fit)
# Predict new sites:
# Generate matrix of environmental variables for 10 new sites
xnew <- cbind(rnorm(10), rnorm(10), rnorm(10))
colnames(xnew) <- colnames(X)
predfit <- predict(fit, newX = xnew, type = "response", level = 0)
TR <- (antTraits$tr[, 1:3])
fitt <- gllvm(y = y, X, TR, family = poisson())
# linear predictors
predlin <- predict(fitt)
# Predict new sites:
# Generate matrix of environmental variables for 10 new sites
xnew <- cbind(rnorm(10), rnorm(10), rnorm(10))
colnames(xnew) <- colnames(X)
# Generate matrix of traits for species
trnew <- data.frame(Femur.length = rnorm(41), No.spines = rnorm(41),
Pilosity = factor(sample(0:3, 41, replace = TRUE)))
predfit <- predict(fitt, newX = xnew, newTR = trnew, type = "response", level = 0)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.