R functions for Generalized Simulated Annealing