# NOT RUN {
load(file = system.file("extdata/resultrect.rda", package = "windfarmGA"))
load(file = system.file("extdata/polygon.rda", package = "windfarmGA"))
new <- random_search(resultrect, polygon, n = 20, best = 4)
plot_random_search(resultRS = new, result = resultrect, Polygon1 = polygon, best = 2)
# }
Run the code above in your browser using DataLab