Update cv.R

modify df