# get and save defaults
defaultControl <- rmooControl()
print(defaultControl)
# get current defaults only for real-valued search
rmooControl("real-valued")
# set defaults for selection operator of real-valued search
rmooControl("real-valued" = list(selection = "rmooreal_lrSelection"))
rmooControl("real-valued")
# set defaults for selection and crossover operators of real-valued search
rmooControl("real-valued" = list(selection = "rmooreal_lrSelection",
crossover = "rmooreal_spCrossover"))
rmooControl("real-valued")
# restore defaults
rmooControl(defaultControl)
rmooControl()
Run the code above in your browser using DataLab