[R] Can someone with knowledge of KNN or Data Mining check out my code for CV KNN