K-fold cross validation using "Learn R linear discriminant analysis"

Haii,
I want to know how can we do k-fold validation using 'Learn R linear discriminant analysis".
Default is Leave-1-out validation.
Is there any easyway or have to do it manually.
please anyone give me suggestions