calculate_weights | R Documentation |
calculate_weights(object, ...)
## S4 method for signature 'trial_sequence_ITT'
calculate_weights(object, quiet = FALSE)
## S4 method for signature 'trial_sequence_AT'
calculate_weights(object, quiet = FALSE)
## S4 method for signature 'trial_sequence_PP'
calculate_weights(object, quiet = FALSE)
object |
A trial_sequence object |
... |
Other arguments used by methods. |
quiet |
Prints model summaries is |
A trial_sequence object with updated censor_weights
and/or switch_weights
slots
save_dir <- file.path(tempdir(), "switch_models")
ts <- trial_sequence("PP") |>
set_data(
data = data_censored,
id = "id",
period = "period",
treatment = "treatment",
outcome = "outcome",
eligible = "eligible"
) |>
set_switch_weight_model(
numerator = ~ age + x1 + x3,
denominator = ~age,
model_fitter = stats_glm_logit(save_path = save_dir)
) |>
calculate_weights()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.