Boa noite,

por favor, preciso dos coeficientes da função discriminante quadrática. Estou usando o exemplo da função "qda" para tentar enteder a função.

#código R
     tr <- sample(1:50, 25)
     train <- rbind(iris3[tr,,1], iris3[tr,,2], iris3[tr,,3])
     test <- rbind(iris3[-tr,,1], iris3[-tr,,2], iris3[-tr,,3])
     cl <- factor(c(rep("s",25), rep("c",25), rep("v",25)))
     z <- qda(train, cl)
     predict(z,test)$class


Desde já, muito obrigado.

Att

--
Guilherme Moraes Ferraudo
Jaboticabal/Campinas - SP
http://lattes.cnpq.br/2096118558794430