r - 判别分析：提取线性方程

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