7 lines
177 B
R
Raw Permalink Normal View History

2025-01-12 00:52:51 +08:00
library(survival)
# Tests for glm
gfit1 <- glm(skips ~ Mask* Opening + Solder, data=solder, poisson)
yg1 <- yates(gfit1, ~Mask)
yg2 <- yates(gfit1, ~ Mask, predict='response')