Let the people around me decide who I am.
library(animation) oopt = ani.options(ani.height = 500, ani.width = 600, outdir = getwd(), nmax = 10, interval = 2, title = "Demonstration for kNN Classification", description = "For each row of the test set, the k nearest (in Euclidean distance) training set vectors are found, and the classification is decided by majority vote, with ties broken at random.") ani.start() par(mar = c(3, 3, 1, 0.5), mgp = c(1.5, 0.5, 0)) knn.ani() ani.stop() ani.options(oopt)