Monthly live births and deaths in Denmark from January 1901 to March 2013.
A data frame with 1356 observations on the following 4 variables.
a numeric vector giving the month
a numeric vector giving the year
a numeric vector. The number of births for the given month and year
a numeric vector. The number of deaths for the given month and year
Data were obtained from the StatBank from Danmarks Statistik, see http://www.statbank.dk.
data(bdstat) plot(bdstat$year + bdstat$month/13, bdstat$birth, type="l")# Create a table of births # Remove year 2013 as it is incomplete btable <- xtabs(births ~ year + month, data=bdstat, subset=(year<2013)) # Compute yearly birth frequencies per month btable.freq <- prop.table(btable, margin=1)