| as.asrtests {asremlPlus} | R Documentation |
Forms an asrtests object that stores (i) a fitted asreml object, (ii) a pseudo-anova table for the fixed terms and (iii) a history of changes and hypothesis testing used in obtaining the model.
Description
An asrtests.object that is a list consisting of
the components asreml.obj, wald.tab and test.summary.
A call to as.asrtests with test.summary = NULL re-initializes the
test.summary
data.frame.
If there is no wald.tab, wald.asreml is called. In all cases,
recalcWaldTab is called and any changes made as specified by the
recalcWaldTab arguments supplied via ....
The label argument can be used to include an entry in test.summary
for the starting model. If a label is included, (i) the information criteria
calculated using the asreml.obj will be added to the test.summary, if
IClikelihood is not set to none and (ii) the number of variance
parameters is included in the denDF column, if IClikelihood is set to none.
Usage
as.asrtests(asreml.obj, wald.tab = NULL, test.summary = NULL,
denDF = "numeric", label = NULL,
IClikelihood = "none", bound.exclusions = c("F","B","S","C"), ...)
Arguments
asreml.obj |
an |
wald.tab |
A |
test.summary |
A |
denDF |
Specifies the method to use in computing approximate denominator
degrees of freedom when |
label |
A |
IClikelihood |
A |
bound.exclusions |
A |
... |
further arguments passed to |
Value
An object of S3-class asrtests.
Author(s)
Chris Brien
References
Kenward, M. G., & Roger, J. H. (1997). Small sample inference for fixed effects from restricted maximum likelihood. Biometrics, 53, 983-997.
See Also
asremlPlus-package, is.alldiffs, as.alldiffs,
recalcWaldTab,
testranfix.asrtests, chooseModel.asrtests,
rmboundary.asrtests,
reparamSigDevn.asrtests
Examples
## Not run:
data(Wheat.dat)
# Fit initial model
current.asr <- asreml(yield ~ Rep + WithinColPairs + Variety,
random = ~ Row + Column + units,
residual = ~ ar1(Row):ar1(Column),
data=Wheat.dat)
# Load current fit into an asrtests object
current.asrt <- as.asrtests(current.asr, NULL, NULL)
# Check for and remove any boundary terms
current.asrt <- rmboundary(current.asrt)
## End(Not run)