How to solve R's approxfun error from DHARMa library

Question

library(DHARMa)
set.seed(123)
glm_4_residuals <- simulateResiduals(glm_4)

Error in approxfun(vals, cumsum(tabulate(match(x, vals)))/