| impute_covariance_matrix {clubSandwich} | R Documentation |
Impute a block-diagonal covariance matrix
Description
'r lifecycle::badge("superseded")'
This function is superseded by the vcalc provided by
the metafor package. Compared to impute_covariance_matrix,
vcalc provides many further features, includes a
data argument, and uses syntax that is consistent with other
functions in metafor.
impute_covariance_matrix calculates a block-diagonal covariance
matrix, given the marginal variances, the block structure, and an assumed
correlation structure. Can be used to create compound-symmetric structures,
AR(1) auto-correlated structures, or combinations thereof.
Usage
impute_covariance_matrix(
vi,
cluster,
r,
ti,
ar1,
smooth_vi = FALSE,
subgroup = NULL,
return_list = identical(as.factor(cluster), sort(as.factor(cluster))),
check_PD = TRUE
)
Arguments
vi |
Vector of variances |
cluster |
Vector indicating which effects belong to the same cluster. Effects with the same value of 'cluster' will be treated as correlated. |
r |
Vector or numeric value of assumed constant correlation(s) between effect size estimates from each study. |
ti |
Vector of time-points describing temporal spacing of effects, for use with auto-regressive correlation structures. |
ar1 |
Vector or numeric value of assumed AR(1) auto-correlation(s)
between effect size estimates from each study. If specified, then |
smooth_vi |
Logical indicating whether to smooth the marginal variances
by taking the average |
subgroup |
Vector of category labels describing sub-groups of effects. If non-null, effects that share the same category label and the same cluster will be treated as correlated, but effects with different category labels will be treated as uncorrelated, even if they come from the same cluster. |
return_list |
Optional logical indicating whether to return a list of matrices (with one entry per block) or the full variance-covariance matrix. |
check_PD |
Optional logical indicating whether to check whether each
covariance matrix is positive definite. If |
Details
A block-diagonal variance-covariance matrix (possibly represented as
a list of matrices) with a specified structure. The structure depends on
whether the r argument, ar1 argument, or both arguments are
specified. Let v_{ij} denote the specified variance for effect
i in cluster j and C_{hij} be the covariance
between effects h and i in cluster
j.
If only
ris specified, each block of the variance-covariance matrix will have a constant (compound symmetric) correlation, so thatC_{hij} = r_j \sqrt{v_{hj} v_{ij},}where
r_jis the specified correlation for clusterj. If only a single value is given inr, then it will be used for every cluster.If only
ar1is specified, each block of the variance-covariance matrix will have an AR(1) auto-correlation structure, so thatC_{hij} = \phi_j^{|t_{hj}- t_{ij}|} \sqrt{v_{hj} v_{ij},}where
\phi_jis the specified auto-correlation for clusterjandt_{hj}andt_{ij}are specified time-points corresponding to effectshandiin clusterj. If only a single value is given inar1, then it will be used for every cluster.If both
randar1are specified, each block of the variance-covariance matrix will have combination of compound symmetric and an AR(1) auto-correlation structures, so thatC_{hij} = \left[r_j + (1 - r_j)\phi_j^{|t_{hj} - t_{ij}|}\right] \sqrt{v_{hj} v_{ij},}where
r_jis the specified constant correlation for clusterj,\phi_jis the specified auto-correlation for clusterjandt_{hj}andt_{ij}are specified time-points corresponding to effectshandiin clusterj. If only single values are given inrorar1, they will be used for every cluster.
If smooth_vi = TRUE, then all of the variances within cluster
j will be set equal to the average variance of cluster
j, i.e.,
v'_{ij} = \frac{1}{n_j} \sum_{i=1}^{n_j}
v_{ij}
for
i=1,...,n_j and j=1,...,k.
Value
If cluster is appropriately sorted, then a list of matrices,
with one entry per cluster, will be returned by default. If cluster
is out of order, then the full variance-covariance matrix will be returned
by default. The output structure can be controlled with the optional
return_list argument.
Examples
if (requireNamespace("metafor", quietly = TRUE)) {
library(metafor)
# Constant correlation
data(SATcoaching)
V_list <- impute_covariance_matrix(vi = SATcoaching$V, cluster = SATcoaching$study, r = 0.66)
MVFE <- rma.mv(d ~ 0 + test, V = V_list, data = SATcoaching)
conf_int(MVFE, vcov = "CR2", cluster = SATcoaching$study)
}