Something along the following lines
bogie <- 0.15
make_bogie <- function() summary(glm(cyl ~ mpg, data = mtcars, family = poisson(link = "log")))$coefficients[2,4] <= bogie
make_bogie()
#> [1] TRUE
is all I can offer without a reprex. See the FAQ: How to do a minimal reproducible example reprex for beginners.