Cross-Validation: Concept and Example in R