Integrated the estimation of the surrogate fitness function with R