I am using the following code as model for plotting the classifier curve of the knn for binary classification in R:
m <-