data(pennLC)
population <- pennLC$data$population
cases <- pennLC$data$cases
## In each county in Pennsylvania, there are 2 races, gender and 4 age bands considered =
## 16 strata levels
pennLC$data[1:16,]
expected(population,cases,16)
Run the code above in your browser using DataCamp Workspace