Update cv.R

involving df