Running examples in 'htmcglm-Ex.R' failed
The error most likely occurred in:

> ### Name: mc_anova_I
> ### Title: ANOVA type I table for mcglm objects via Wald test.
> ### Aliases: mc_anova_I
> 
> ### ** Examples
> 
> 
> library(mcglm)
----------------------------------------------------------------------
  mcglm: Multivariate Covariance Generalized Linear Models

  For support, collaboration or bug report, visit: 
    http://mcglm.leg.ufpr.br/

  mcglm version 0.7.0 (build on 2021-07-07) is now loaded.
----------------------------------------------------------------------
> library(Matrix)
> library(htmcglm)
> 
> data("soya", package = "mcglm")
> 
> form.grain <- grain ~ water * pot
> form.seed <- seeds ~ water * pot
> 
> soya$viablepeasP <- soya$viablepeas / soya$totalpeas
> form.peas <- viablepeasP ~ water * pot
> 
> Z0 <- mc_id(soya)
> Z1 <- mc_mixed(~0 + factor(block), data = soya)
> 
> fit_joint <- mcglm(linear_pred = c(form.grain,
+                                    form.seed,
+                                    form.peas),
+                    matrix_pred = list(c(Z0, Z1),
+                                       c(Z0, Z1),
+                                       c(Z0, Z1)),
+                    link = c("identity",
+                             "log",
+                             "logit"),
+                    variance = c("constant",
+                                 "tweedie",
+                                 "binomialP"),
+                    Ntrial = list(NULL,
+                                  NULL,
+                                  soya$totalpeas),
+                    power_fixed = c(TRUE,TRUE,TRUE),
+                    data = soya)
Automatic initial values selected. 
Error in (function (classes, fdef, mtable)  : 
  unable to find an inherited method for function 'forceSymmetric' for signature '"dgCMatrix", "logical"'
Error in model_fit$IterationCovariance : 
  $ operator is invalid for atomic vectors
Calls: mcglm -> na.exclude
Execution halted