library(MASS)
Iris - data.frame(rbind(iris3[,,1], iris3[,,2], iris3[,,3]),
+Sp = rep(c(s,c,v), rep(50,3)))
train - sample(1:150, 75)
table(Iris$Sp[train])
c s v
22 23 30
z - lda(Sp ~ ., Iris, prior = c(1,1,1)/3, subset = train)
Error in if (targetlist[i] ==
On Nov 17, 2009, at 10:55 AM, Greg Riddick wrote:
library(MASS)
Iris - data.frame(rbind(iris3[,,1], iris3[,,2], iris3[,,3]),
+Sp = rep(c(s,c,v), rep(50,3)))
train - sample(1:150, 75)
table(Iris$Sp[train])
c s v
22 23 30
z - lda(Sp ~ ., Iris, prior =
2 matches
Mail list logo