# Falls back to base::sample for non-synthesizer objects:
sample(1:10, 3)
# \donttest{
meta <- metadata(adult_income) |>
set_column_type("age", "numerical") |>
set_column_type("income", "categorical")
syn <- gaussian_copula_synthesizer(meta) |> fit(adult_income)
synth <- sample(syn, n = 100)
head(synth)
# }
Run the code above in your browser using DataLab