2 Cancer: difference in two binomial proportions

library("tidyverse")
library("rstan")

Two groups chosen to be random samples from subpopulations of lung-cancer patients and cancer-free individuals.¹ The scientific question of interest is the difference in the smoking habits between two groups. The results of the survey are:

cancer <- tribble(
  ~group, ~n, ~smokers,
  "Cancer patients", 86, 82,
  "Control group", 86, 72
)

This example is derived from Simon Jackman, “Cancer: difference in two binomial proportions”, BUGS Examples, 2007-07-24, This examples comes from Johnson and Albert (1999), using data from Dorn (1954).↩