Score_per_criteria1.R