library(survival)
# Tests for glm
gfit1 <- glm(skips ~ Mask* Opening + Solder, data=solder, poisson)
yg1 <- yates(gfit1, ~Mask)
yg2 <- yates(gfit1, ~ Mask, predict='response')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.