Update cv.R

add fitype in lambdamax