Updated Criteria1.r