Fixed type in k-nearest-neighbor.lsp