# NOT RUN {
# simulate random clustering
random_cluster <- nlm_randomcluster(ncol = 30, nrow = 30,
p = 0.4,
ai = c(0.25, 0.25, 0.5))
# }
# NOT RUN {
# visualize the NLM
landscapetools::show_landscape(random_cluster)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab