> model1 <- glmer(categorical_FOD_FODs ~ Condition_FODs + developmentaldisorder_FODs + Condition_FODs:developmentaldisorder_FODs + (1|subject_FODs), + data = indvar_FODs, + family = "binomial", + control = glmerControl(optimizer = "bobyqa")) what should I do if there is 'isSingular'? write me the code > if (summary(model1)$isSingular) { + model1 <- glmer(categorical_FOD_FODs ~ developmentaldisorder_FODs + Condition_FODs + developmentaldisorder_FODs: Condition_FODs + (1|subject_FODs), + data = indvar_FODs, + family = "binomial", + control = glmerControl(optimizer = "bobyqa")) + } Error in if (summary(model1)$isSingular) { : argument is of length zero

x <- 1
if (x) {
  x <- 2
}
x