How to obtain predicted group means and group slopes from an mblogit object?

Question

With a categorical variable t and some covariate x, I run the random-effects multinomial logit:

model <- mblogit(t ~ x, data = sa