data(frailty)
ms <- multisimsum(
data = frailty, par = "par", true = c(
trt = -0.50,
fv = 0.75
), estvarname = "b", se = "se", methodvar = "model",
by = "fv_dist"
)
sms <- summary(ms, stats = c("bias", "cover", "mse"))
sms
# Printing less significant digits:
print(sms, digits = 3)
# Printing confidence intervals:
print(sms, digits = 3, mcse = FALSE)
# Printing values only:
print(sms, mcse = NULL)
Run the code above in your browser using DataLab