Propensity Score Cloud Plot

Propensity Score Cloud Plot

prop_scr_cloud(x, trimmed_prop_scr = NULL)

Arguments

x

A prop_scr object

trimmed_prop_scr

A trimmed prop_scr object

Value

ggplot object

Examples

library(dplyr)
ps_obj <- calc_prop_scr(internal_df = filter(int_norm_df, trt == 0),
                        external_df = ex_norm_df,
                        id_col = subjid,
                        model = ~ cov1 + cov2 + cov3 + cov4)
ps_obj_trimmed <- trim(ps_obj, low = 0.1, high = 0.6)
# Plotting the Propensity Scores
prop_scr_cloud(ps_obj, trimmed_prop_scr = ps_obj_trimmed)