使用 modelsummary（） 'shape' 参数作为已弃用的 modelsummary_wide（） 的替代方案

问：

我正在使用 nnet 运行多项式 logit 模型，然后想在模型汇总表中显示结果，并将因子水平作为列：

library("nnet")

multi <- multinom(DV ~ var1, data = wave1)

alpha <- summary(multi)$coefficients / summary(multi)$standard.errors
abs(alpha)
# Calculate p values by hand
p_values <- (1 - pnorm(abs(alpha))) * 2
p_values

library("modelsummary")
modelsummary_wide(multi, output = "gt", stars = TRUE)

以前我使用 modelsummary_wide（） 执行此操作，但现在显然已弃用，我应该使用 modelsummary（） 中的 shape 参数。

但是，我真的不知道该怎么做。有人可以给我一些提示吗？

谢谢