| rrvglm.control {VGAM} | R Documentation | 
Control Function for rrvglm()
Description
Algorithmic constants and parameters for
running rrvglm are set using this
function.
Doubly constrained RR-VGLMs (DRR-VGLMs) are
also catered for.
Usage
rrvglm.control(Rank = 1, Corner = TRUE,
    Index.corner = head(setdiff(seq(length(str0) +
    Rank), str0), Rank), noRRR = ~ 1, str0 = NULL,
    Crow1positive = NULL, trace = FALSE, Bestof = 1,
    H.A.thy = list(), H.C = list(),
    Ainit = NULL, Cinit = NULL, sd.Cinit = 0.02,
    Algorithm = "alternating", Etamat.colmax = 10,
    noWarning = FALSE, Use.Init.Poisson.QO = FALSE,
    checkwz = TRUE, Check.rank = TRUE, Check.cm.rank = TRUE,
    wzepsilon = .Machine$double.eps^0.75, ...)
Arguments
| Rank | The numerical rank  | 
| Corner | Logical indicating whether corner
constraints are to be used.
Strongly recommended as the only
method for fitting RR-VGLMs and
DRR-VGLMs.
This is one
method for ensuring a unique solution
and the availability of standard errors.
If  | 
| Index.corner | Specifies the  For DRR-VGLMs one needs
to have (restricted) corner constraints.
Then argument  | 
| noRRR | Formula giving terms that are not
to be included in the reduced-rank
regression.  That is,  | 
| str0 | Integer vector specifying which rows of the
estimated constraint matrices (A)
are to be all zeros.  These are called
structural zeros.  Must not have
any common value with  | 
| Crow1positive | Currently this argument has no effect.
In the future, it may be a
logical vector of length  | 
| trace | Logical indicating if output should be produced for each iteration. | 
| Bestof | Integer. The best of  | 
| H.A.thy,H.C | Lists.
DRR-VGLMs are Doubly constrained
RR-VGLMs where A has
 | 
| Algorithm | Character string indicating what algorithm is
to be used. The default is the first one.
The choice  | 
| Ainit,Cinit | Initial A and C matrices which may speed up convergence. They must be of the correct dimension. | 
| sd.Cinit | Standard deviation of the initial values
for the elements of C.
These are normally distributed with
mean zero.  This argument is used only if
 | 
| Etamat.colmax | Positive integer, no smaller than
 | 
| Use.Init.Poisson.QO | Logical indicating whether the
 | 
| checkwz | logical indicating whether the diagonal
elements of the working weight matrices
should be checked whether they are
sufficiently positive, i.e., greater than
 | 
| noWarning,Check.rank,Check.cm.rank | Same as  | 
| wzepsilon | Small positive number used to test whether the diagonals of the working weight matrices are sufficiently positive. | 
| ... | Variables in ... are passed into
 | 
In the above, R is the Rank and
M is the number of linear predictors.
Details
VGAM supported three normalizations
to ensure a unique solution.
But currently,
only corner constraints will work with
summary of RR-VGLM
and DRR-VGLM objects.
Update during late-2023/early-2024:
with ongoing work implementing
the "drrvglm" class, there may
be disruption and changes to other
normalizations. However, corner
constraints should be fully supported
and have the greatest priority.
Value
A list with components matching the input names. Some error checking is done, but not much.
Note
In VGAM 1.1-11 and higher,
the following arguments are no longer supported:
Wmat, Norrr, Svd.arg,
Uncorrelated.latvar, scaleA.
Users should use corner constraints only.
The arguments in this function begin with an
upper case letter to help avoid interference
with those of vglm.control.
In the example below a rank-1 stereotype model (Anderson, 1984) is fitted, however, the intercepts are completely unconstrained rather than sorted.
Author(s)
Thomas W. Yee
References
Yee, T. W. and Hastie, T. J. (2003). Reduced-rank vector generalized linear models. Statistical Modelling, 3, 15–41.
See Also
rrvglm,
rrvglm-class,
summary.drrvglm,
rrvglm.optim.control,
vglm,
vglm.control,
TypicalVGAMfamilyFunction,
CM.qnorm,
cqo.
Examples
## Not run: 
set.seed(111)
pneumo <- transform(pneumo, let = log(exposure.time),
                            x3 = runif(nrow(pneumo)))  # Unrelated
fit <- rrvglm(cbind(normal, mild, severe) ~ let + x3,
              multinomial, pneumo, Rank = 1, Index.corner = 2)
constraints(fit)
vcov(fit)
summary(fit)
## End(Not run)