Create gpOptimise.R