library(mlr3)
task = tgen("2dnormals")$generate(n = 10)
task$data()
sampler = MarginalPermutationSampler$new(task)
# Sample using row_ids from stored task
sampler$sample("x1")
# Or use external data
data = task$data()
sampler$sample_newdata("x1", newdata = data)
Run the code above in your browser using DataLab