if (FALSE) {
cls_1 <- flsgen_class_structure("class 1", c(10, 100, 1000))
cls_2 <- flsgen_class_structure("class 2", c(20, 200, 2000))
ls_struct <- flsgen_landscape_structure(200, 200, list(cls_1, cls_2))
}
Run the code above in your browser using DataLab