
> data("sdc_descriptives_DT")

> sdc_descriptives(data = sdc_descriptives_DT, id_var = "id", val_var = "val_1")
-------------------------------------------------- SDC results (descriptives) --
OPTIONS: sdc.n_ids: 5 | sdc.n_ids_dominance: 2 | sdc.share_dominance: 0.85
SETTINGS: id_var: id | val_var: val_1 | zero_as_NA: FALSE
✓ Output complies to RDC rules.
--------------------------------------------------------------------------------

> data("sdc_min_max_DT")

> sdc_min_max(data = sdc_min_max_DT, id_var = "id", val_var = "val_1")
------------------------------------------------------------ SDC safe min/max --
OPTIONS: sdc.n_ids: 5 | sdc.n_ids_dominance: 2 | sdc.share_dominance: 0.85
SETTINGS: id_var: id | val_var: val_1
   val_var min distinct_ids_min max distinct_ids_max
1:   val_1   3                5  18                5
--------------------------------------------------------------------------------

> data("sdc_model_DT")

> model_1 <- lm(y ~ x_1 + x_2, data = sdc_model_DT)

> sdc_model(data = sdc_model_DT, model = model_1, id_var = "id")
--------------------------------------------------------- SDC results (model) --
OPTIONS: sdc.n_ids: 5 | sdc.n_ids_dominance: 2 | sdc.share_dominance: 0.85
SETTINGS: id_var: id
✓ Output complies to RDC rules.
--------------------------------------------------------------------------------
