r - 以计数矩阵作为响应的多项式

Question

根据multinom的帮助, 包裹 nnet ，“响应应该是一个因子或一个具有 K 列的矩阵，这将被解释为每个 K 类的计数。”我尝试在第二种情况下使用此功能，但出现错误。

这是我所做的示例代码:

response  <- matrix(round(runif(200,0,1)*100),ncol=20) # 10x20 matrix of counts
predictor <- runif(10,0,1)
fit1 <- multinom(response ~ predictor)
weights1 <- predict(fit1, newdata = 0.5, "probs")

这是我得到的:

'newdata' had 1 row but variables found have 10 rows

我该如何解决这个问题？

奖励问题:我还注意到我们可以将多项式与因子预测变量一起使用，例如predictor <- factor(c(1,2,2,3,1,2,3,3,1,2)) .我不明白这在数学上是如何可能的，因为多项式线性 logit 回归应该只适用于连续或二分预测变量。

Answer 1

获取新变量预测的最简单方法是将新数据定义为数据帧。

使用示例代码

> predict(fit1, newdata = data.frame(predictor = 0.5), type = "probs")
 [1] 0.07231972 0.05604055 0.05932186 0.07318140 0.03980245 0.06785690 0.03951593 0.02663618
 [9] 0.04490844 0.04683919 0.02298260 0.04801870 0.05559221 0.04209283 0.03799946 0.06406533
[17] 0.04509723 0.02197840 0.06686314 0.06888748