At 13:15 5/9/2005, you wrote:
>Hi,
>
> I'm using mda library to solve a discriminant
>analysis. I get results, but the thing is that I want
>to use Fisher's method to obtain the classification
>functions and I'm lost in what I should do: libraries
>to use, ... Can anybody give me a clue??
Hi Carlos,
I think you need something this
require(mda)
data(iris)
attach(iris)
irisfit <- mda(Species ~ ., data = iris)
irisfit$fit$coef[,1:2]
r1<-
-4.23481161+0.37972423*Sepal.Length+0.59682846*Sepal.Width+0.01575609*Petal.Length+0.11009570*Petal.Width
r2<-0.31169082-0.05826293*Sepal.Length-0.23855482*Sepal.Width+0.18922693*Petal.Length+0.03917652*Petal.Width
plot(r1,r2,pch = 21, bg = c("red", "green3", "blue")[unclass(iris$Species)])
Bernardo Rangel Tura, MD, MSc
National Institute of Cardiology Laranjeiras
Rio de Janeiro Brazil
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
