Returns the corrected draws if available, otherwise the original draws.
This method allows svyder objects to be used wherever a numeric
matrix of posterior draws is expected.
Usage
# S3 method for class 'svyder'
as.matrix(x, ...)See also
der_correct() for applying the correction.
Other svyder-methods:
glance.svyder(),
is.svyder(),
print.svyder(),
summary.svyder(),
tidy.svyder()
Examples
data(nsece_demo)
result <- der_diagnose(
nsece_demo$draws,
y = nsece_demo$y, X = nsece_demo$X,
group = nsece_demo$group, weights = nsece_demo$weights,
psu = nsece_demo$psu, family = "binomial",
sigma_theta = nsece_demo$sigma_theta,
param_types = nsece_demo$param_types
)
draws <- as.matrix(result)
dim(draws)
#> [1] 4000 54