updated evaluationFunction.R