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)