有没有一种方法可以使用ggpreeict获取多项式逻辑回归模型的标准误差

Question

是否有一种方法使用ggpredict并使用multinom和ggpredict获得多项逻辑回归模型的预测概率的标准误差（或置信区间）？谢谢。

var1<-sample(c('A', 'B', 'C'), size=1000, replace=T)
var2<-rnorm(n=1000)
var3<-rnorm(n=1000)

df<-data.frame(var1, var2, var3)
library(nnet)
mod1<-multinom(var1~var2+var3, data=df)

library(ggeffects)
preds<-ggpredict(mod1, terms="var2")
data.frame(preds)