Update cvscore4.R