Resolving the '‘==’ only defined for equally-sized data frames' Error in Generalized Additive Models with gratia in R

Using tryCatch and Printing Error Message When Expression Fails with R's stats::chisq.test Function for Goodness of Fit Tests