# \donttest{
# Generate multi-center patterns with fixed centers
patterns <- simulate_multiscale_overlap()
# Single center at grid center
patterns_single <- simulate_multiscale_overlap(n_centers = 1)
# Custom parameters with multiple centers
Ra_seq <- seq(from = 10, to = 3, length.out = 4)
Rb_seq <- seq(from = 15, to = 2, length.out = 4)
patterns <- simulate_multiscale_overlap(
Ra_seq = Ra_seq,
Rb_seq = Rb_seq,
n_centers = 2,
seed = 456
)
# }
Run the code above in your browser using DataLab