Update knn.R