Aliases: lvq2
Keywords: classif
### ** Examples train <- rbind(iris3[1:25,,1], iris3[1:25,,2], iris3[1:25,,3]) test <- rbind(iris3[26:50,,1], iris3[26:50,,2], iris3[26:50,,3]) cl <- factor(c(rep("s",25), rep("c",25), rep("v",25))) cd <- lvqinit(train, cl, 10) lvqtest(cd, train)
[1] s s s s s s s s s s s s s s s s s s s s s s s s s c c v c c c c c c c c c c [39] c c c c c c c c c c c c v v v v v v c v v v v v v v v v v v v c v v v v v Levels: c s v
cd0 <- olvq1(train, cl, cd) lvqtest(cd0, train)
[1] s s s s s s s s s s s s s s s s s s s s s s s s s c c c c c c c c c c c c c [39] c c c c c c c c c c c c v v v v v v v v v v v v v v v v v v v v v v v c v Levels: c s v
cd2 <- lvq2(train, cl, cd0) lvqtest(cd2, train)
[1] s s s s s s s s s s s s s s s s s s s s s s s s s c c c c c c c c c c c c c [39] c c c c c c c c c c c c v v v v v v v v v v v v v v v v v v v v v v v c v Levels: c s v