Update cvscore1.R