R手动改变nnet :: multinom模型对象的系数

Question

如何手动更改R nnet :: multinom模型对象的系数？

我试过了：

S = summary(multi_mod)
S$coefficients = coef_hitl

但如果我查看multi_mod对象，系数不会改变。

此外，是否有一种很好的Matrix格式可以预测新数据集的多项Logistic回归？这样的东西，以便我可以手动进行预测？

X *（X＆＃39; * X）^ - 1 * X＆＃39; * y