判别分析：提取线性方程

Question

判别分析涉及提取回归式线性方程。判别分析产生的等式如下：

D = v1 * X1 + V2 * X3 + V3 * X3 + a

如何从R中的判别分析中提取出这个等式？我在MASS包中使用LDA功能。

Answer 1

来自?lda

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])
## your answer may differ
##  c  s  v
## 22 23 30
z <- lda(Sp ~ ., Iris, prior = c(1,1,1)/3, subset = train)
predict(z, Iris[-train, ])$class

然后你可以检查

formula(z)

并查看?formula