lvqinit(x, cl, size, prior, k=5)
n
by
p
.
n
.
min(round(0.4*ng*(ng-1 + p/2),0), n)
where
ng
is the number of classes.
x
and
cl
giving
the examples and classes.
Selects
size
examples from the training set without replacement with
proportions proportional to the prior or the original proportions.
Kohonen, T. (1990) The self-organizing map.
Proc. IEEE
78, 1464-1480.
Kohonen, T. (1995)
Self-Organizing Maps.
Springer, Berlin.
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))) cd <- lvqinit(train, cl, 10) lvqtest(cd, train) cd1 <- olvq1(train, cl, cd) lvqtest(cd1, train)