1.你的k近邻估计,指的可是k-Nearest Neighbour Classification?
library(class)
train <- rbind(iris[1:25,,1],iris[1:25,,2],iris[1:25,,3])
test <- rbind(iris[26:50,,1],iris[26:50,,2],iris[26:50,,3])
cl <- factor(c(rep("s",25),rep("c",25), rep("v",25)))
knn(train, test, cl, k=3, prob=T)
attributes(.Last.value)
2.你的正交序列估计,指的可是orthogonal least square?