include_reference not working in model_parameters with glmmTMB object

[teecrow]

Hi all, thanks for a great package!

I have been unable to get the include_reference argument to work with my glmmTMB fitted objects. Here is a reprex:

fit_penguins <- glmmTMB(sex ~ flipper_len + island + (1 | year), family=binomial(), data = penguins)
fit_penguins |> model_parameters(exponentiate = TRUE, include_reference=TRUE)

returns this for the fixed effects:

Parameter          | Odds Ratio |       SE |       95% CI |     z |      p
--------------------------------------------------------------------------
(Intercept)        |   1.81e-06 | 4.52e-06 | [0.00, 0.00] | -5.29 | < .001
flipper len        |       1.07 |     0.01 | [1.04, 1.09] |  5.33 | < .001
island [Dream]     |       2.84 |     0.93 | [1.49, 5.41] |  3.18 | 0.001 
island [Torgersen] |       2.97 |     1.22 | [1.32, 6.65] |  2.64 | 0.008 

However, it works as expected when running compare_parameters(fit_penguins):

Parameter          |           fit_penguins
-------------------------------------------
(Intercept)        | -13.22 (-18.12, -8.32)
flipper len        |   0.06 (  0.04,  0.09)
island [Biscoe]    |                   0.00
island [Dream]     |   1.05 (  0.40,  1.69)
island [Torgersen] |   1.09 (  0.28,  1.89)
-------------------------------------------
Observations       |                    333

Passing include_reference to parameters:::print_html.parameters_model() instead or in addition makes no difference.