R/quiz5.R

In pbreheny/bios4120: Practice problems and exercises for BIOS 4120

Defines functions quiz5

Documented in quiz5

quiz5 <- function()
  {
    x <- runif(1)
    if (x < .5) surv()
    else ANOVA()
  }