Error in `h(simpleError(msg, call))`: error in evaluating the argument 'a' in selecting a method for function 'solve': object 'Hessian' not found

cbind(incidence, size - incidence) ~ period + x + x2 + (1 + x | herd),
model <- lme4::lmer(Reaction ~ Days + (1 + Days | Subject), data = sleepstudy)
poly(Petal.Width, 4) * poly(Petal.Length, 4) + (1 + poly(Petal.Width, 4) | Species),
Sepal.Length ~ Petal.Width + (1 | Species),