w = drop(t(svm_model$coefs)%*%as.matrix(X[svm_model$index,1:length(SFI)]))#取出超平面的权重向量
svm_model为训练的模型
1:length(SFI),表示的是一个向量,不用纠结SFI是啥,假设应该是求14个变量的权重,这里就是1:14,求8个变量的权重就是1:8,这个 SFI是我写的代码里命名的一个东西,其他的部分照抄。
w = drop(t(svm_model$coefs)%*%as.matrix(X[svm_model$index,1:length(SFI)]))#取出超平面的权重向量
svm_model为训练的模型
1:length(SFI),表示的是一个向量,不用纠结SFI是啥,假设应该是求14个变量的权重,这里就是1:14,求8个变量的权重就是1:8,这个 SFI是我写的代码里命名的一个东西,其他的部分照抄。