有没有办法将线性判别式的系数提取到数据框中?

Is there a way to extract the coefficient of linear discriminant into a data frame?

iris数据集为例,我理解做LDA,你可以这样用:

library(MASS) 
iris[1:4] <- scale(iris[1:4])
sample <- sample(c(TRUE, FALSE), nrow(iris), replace=TRUE, prob=c(0.7,0.3))
train <- iris[sample, ]
test <- iris[!sample, ] 

model <- lda(Species~., data=train)

#view model output
model

并且会return组均值,线性判别系数和迹比例。

但是,有没有办法将线性判别式的系数提取到数据帧中?

你可以用 str(model) 检查整个数据结构,用 model$scaling 你可以用线性判别式

得到 data.frame