Skip to content

Instantly share code, notes, and snippets.

@gka
Created May 19, 2012 14:34
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save gka/2731041 to your computer and use it in GitHub Desktop.
Save gka/2731041 to your computer and use it in GitHub Desktop.
Daily Births Per Month in Germany, normalized by birth per day over the full year.
Year Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec Total
1950 3091.48387097 3266.96428571 3325.90322581 3187.86666667 3160.58064516 3078.7 2958.09677419 2885.80645161 3056.83333333 2943.70967742 2912.8 2864.74193548 3059.45479452
1951 3029.5483871 3181.71428571 3210.74193548 3142.96666667 3196.41935484 3087.1 3017.0 2929.35483871 3022.56666667 2884.61290323 2806.4 2878.16129032 3031.17808219
1952 3072.0 3223.24137931 3268.4516129 3181.03333333 3115.93548387 2994.03333333 2973.5483871 2865.29032258 3070.0 2807.74193548 2860.5 2814.5483871 3027.62739726
1953 3052.90322581 3175.96428571 3248.19354839 3163.06666667 3142.83870968 3039.6 2975.5483871 2856.61290323 3061.5 2774.12903226 2679.63333333 2846.16129032 3000.07945205
1954 3074.06451613 3238.64285714 3172.93548387 3180.3 3243.35483871 3096.2 3021.51612903 2930.4516129 3054.9 2781.06451613 2848.86666667 2862.19354839 3040.39178082
1955 3058.03225806 3235.96428571 3286.93548387 3178.4 3151.77419355 3104.63333333 2988.51612903 2933.41935484 3064.06666667 2879.61290323 2861.16666667 2880.83870968 3050.43287671
1956 3062.25806452 3310.37931034 3381.35483871 3230.03333333 3236.93548387 3051.4 3074.90322581 2983.16129032 3127.06666667 2904.35483871 2969.03333333 2964.83870968 3115.53150685
1957 3139.67741935 3379.17857143 3370.12903226 3362.16666667 3291.83870968 3247.66666667 3102.64516129 3032.22580645 3261.93333333 3068.35483871 3007.96666667 3077.25806452 3193.30136986
1958 3268.0 3405.53571429 3518.64516129 3294.36666667 3319.87096774 3057.16666667 2936.19354839 3010.09677419 3407.76666667 3108.87096774 3134.03333333 3216.22580645 3221.56164384
1959 3395.19354839 3633.60714286 3639.09677419 3617.73333333 3522.06451613 3419.23333333 3355.03225806 3244.09677419 3449.53333333 3222.4516129 3183.46666667 3237.61290323 3408.00547945
1960 3391.67741935 3658.82758621 3659.16129032 3578.23333333 3549.83870968 3491.9 3452.29032258 3415.29032258 3561.0 3171.96774194 3190.26666667 3258.67741935 3456.47671233
1961 3600.61290323 3793.42857143 3859.58064516 3746.13333333 3692.77419355 3561.8 3486.51612903 3478.0 3614.53333333 3445.19354839 3451.73333333 3471.61290323 3598.64383562
1962 3605.32258065 3772.75 3815.80645161 3724.86666667 3723.22580645 3615.06666667 3533.80645161 3539.29032258 3657.66666667 3423.19354839 3434.53333333 3453.96774194 3606.94246575
1963 3769.77419355 3864.03571429 4020.25806452 3903.9 3875.80645161 3682.73333333 3705.87096774 3566.61290323 3779.13333333 3497.4516129 3463.56666667 3452.03225806 3713.95890411
1964 3793.03225806 3955.48275862 3965.74193548 3972.23333333 3814.35483871 3736.46666667 3704.16129032 3512.03225806 3755.53333333 3411.41935484 3383.1 3514.58064516 3718.64109589
1965 3637.90322581 3918.85714286 3915.51612903 3838.0 3753.06451613 3658.33333333 3595.74193548 3526.35483871 3660.26666667 3301.83870968 3437.0 3361.51612903 3631.19452055
1966 3639.09677419 3796.21428571 3893.61290323 3817.73333333 3776.74193548 3700.93333333 3593.32258065 3523.77419355 3607.46666667 3363.29032258 3350.0 3298.06451613 3611.7890411
1967 3503.64516129 3772.25 3736.96774194 3660.6 3667.58064516 3534.3 3450.77419355 3355.4516129 3479.23333333 3272.5483871 3214.0 3206.87096774 3485.68767123
1968 3501.67741935 3561.5862069 3597.4516129 3535.26666667 3475.90322581 3358.5 3266.4516129 3225.51612903 3289.86666667 2962.19354839 2996.36666667 3076.67741935 3328.67945205
1969 3333.5483871 3379.46428571 3447.22580645 3334.03333333 3262.29032258 3127.3 3168.0 2959.5483871 3119.5 2858.06451613 2794.63333333 2793.16129032 3129.76986301
1970 2892.12903226 3038.17857143 3090.32258065 3041.63333333 2959.87096774 2968.6 2916.87096774 2745.0 2735.3 2563.22580645 2676.1 2833.19354839 2870.51232877
1971 2855.77419355 2965.25 3010.0 2930.13333333 2876.25806452 2812.9 2780.5483871 2642.09677419 2780.0 2568.58064516 2593.76666667 2520.4516129 2776.42739726
1972 2657.35483871 2729.17241379 2729.51612903 2651.8 2648.35483871 2630.03333333 2513.77419355 2306.4516129 2293.56666667 2150.12903226 2150.33333333 2115.03225806 2470.29315068
1973 2339.09677419 2349.21428571 2380.51612903 2309.7 2295.80645161 2308.56666667 2298.90322581 2199.06451613 2205.2 2077.83870968 2054.83333333 2016.58064516 2235.53150685
1974 2266.16129032 2239.25 2335.80645161 2276.8 2338.12903226 2220.03333333 2271.67741935 2214.0 2278.26666667 2073.41935484 2011.76666667 1958.70967742 2206.84931507
1975 2208.90322581 2232.71428571 2232.77419355 2249.13333333 2214.70967742 2171.1 2212.09677419 2110.83870968 2165.0 1971.51612903 1951.36666667 2007.09677419 2143.31506849
1976 2221.48387097 2214.17241379 2291.64516129 2197.06666667 2219.03225806 2229.1 2230.51612903 2188.96774194 2297.0 2055.25806452 2040.36666667 1993.64516129 2187.21643836
1977 2120.58064516 2210.07142857 2310.67741935 2239.16666667 2330.67741935 2312.4 2226.5483871 2196.12903226 2292.23333333 2114.96774194 2086.2 2046.03225806 2206.83835616
1978 2178.64516129 2279.64285714 2326.38709677 2303.33333333 2339.51612903 2282.83333333 2266.83870968 2170.87096774 2257.4 2092.61290323 2034.26666667 2059.12903226 2215.39452055
1979 2198.03225806 2226.46428571 2276.61290323 2279.66666667 2306.12903226 2230.4 2298.48387097 2266.25806452 2334.13333333 2196.48387097 2147.93333333 2106.77419355 2238.95068493
1980 2328.35483871 2340.44827586 2364.70967742 2393.43333333 2421.93548387 2407.46666667 2492.90322581 2359.58064516 2447.96666667 2308.4516129 2239.46666667 2281.03225806 2372.02465753
1981 2310.4516129 2453.96428571 2395.77419355 2393.4 2333.51612903 2397.13333333 2466.70967742 2411.51612903 2499.8 2250.67741935 2213.03333333 2227.74193548 2361.91780822
1982 2323.0 2399.28571429 2422.74193548 2351.2 2296.12903226 2406.33333333 2453.35483871 2397.0 2499.23333333 2302.74193548 2241.43333333 2229.19354839 2359.65753425
1983 2243.93548387 2356.32142857 2331.83870968 2257.43333333 2317.64516129 2329.6 2318.22580645 2331.90322581 2363.46666667 2156.93548387 2124.33333333 2096.64516129 2268.30958904
1984 2129.5483871 2265.17241379 2270.48387097 2188.76666667 2240.51612903 2246.7 2311.32258065 2284.4516129 2304.2 2186.5483871 2139.53333333 2068.29032258 2225.45753425
1985 2217.16129032 2254.21428571 2288.09677419 2272.76666667 2262.38709677 2184.1 2333.58064516 2246.06451613 2361.13333333 2204.70967742 2101.5 2031.87096774 2229.59726027
1986 2267.29032258 2316.35714286 2271.19354839 2380.73333333 2313.12903226 2342.1 2384.22580645 2359.09677419 2509.6 2305.12903226 2180.1 2261.16129032 2323.92328767
1987 2312.38709677 2355.0 2363.03225806 2351.8 2398.48387097 2504.8 2524.32258065 2443.61290323 2527.76666667 2287.87096774 2233.56666667 2234.51612903 2377.99726027
1988 2423.03225806 2460.31034483 2518.06451613 2352.46666667 2473.35483871 2428.0 2494.4516129 2530.70967742 2621.86666667 2343.58064516 2324.76666667 2308.12903226 2446.55616438
1989 2349.48387097 2473.03571429 2423.96774194 2377.06666667 2409.35483871 2423.56666667 2541.4516129 2513.58064516 2493.43333333 2318.35483871 2300.43333333 2327.0 2412.21643836
1990 2445.16129032 2517.53571429 2471.93548387 2420.46666667 2469.87096774 2435.73333333 2616.06451613 2631.06451613 2678.3 2476.0 2349.43333333 2266.22580645 2481.30136986
1991 2387.22580645 2368.78571429 2297.41935484 2275.93333333 2272.38709677 2292.13333333 2387.70967742 2325.64516129 2401.0 2126.0 2099.33333333 2063.0 2274.02465753
1992 2240.25806452 2287.20689655 2227.5483871 2171.26666667 2182.03225806 2247.26666667 2339.80645161 2294.32258065 2360.76666667 2084.83870968 2046.2 2051.19354839 2216.75068493
1993 2245.48387097 2258.35714286 2218.77419355 2164.9 2114.25806452 2240.56666667 2322.03225806 2275.80645161 2330.5 2091.67741935 2005.76666667 1988.77419355 2187.5260274
1994 2082.51612903 2139.35714286 2115.22580645 2128.9 2119.77419355 2177.36666667 2188.51612903 2160.35483871 2190.73333333 2003.32258065 1990.4 2010.25806452 2108.50136986
1995 2057.80645161 2109.92857143 2073.06451613 1939.0 1990.22580645 2168.83333333 2239.4516129 2213.83870968 2244.83333333 2121.48387097 2033.33333333 1967.4516129 2096.49589041
1996 2061.25806452 2137.03448276 2102.0 2054.26666667 2067.48387097 2192.83333333 2315.41935484 2299.03225806 2372.26666667 2189.32258065 2149.1 2158.5483871 2180.85753425
1997 2269.22580645 2310.10714286 2126.74193548 2246.93333333 2226.5483871 2317.7 2374.96774194 2285.87096774 2348.5 2136.32258065 2006.3 2061.19354839 2225.13150685
1998 2157.67741935 2188.39285714 2109.32258065 2144.0 2086.77419355 2115.1 2314.29032258 2246.51612903 2347.4 2083.83870968 2024.73333333 1995.83870968 2150.77808219
1999 2120.58064516 2145.28571429 2062.96774194 2059.06666667 2105.38709677 2175.4 2271.03225806 2209.67741935 2283.16666667 2001.32258065 1925.7 1983.09677419 2111.62739726
2000 2119.83870968 2155.48275862 2079.51612903 2040.5 2096.90322581 2115.56666667 2179.48387097 2201.80645161 2215.5 2031.5483871 1955.86666667 1957.58064516 2101.36712329
2001 2061.48387097 1982.78571429 1964.25806452 1960.73333333 2039.80645161 2045.5 2141.06451613 2115.38709677 2105.2 1972.83870968 1905.8 1848.38709677 2012.26027397
2002 1961.38709677 1990.78571429 1963.77419355 1930.2 1899.5483871 1967.83333333 2099.58064516 2051.51612903 2115.16666667 1974.93548387 1844.66666667 1848.35483871 1970.54794521
2003 1905.77419355 1911.39285714 1850.74193548 1899.2 1911.48387097 1972.1 2127.93548387 2027.83870968 2121.8 1905.64516129 1795.66666667 1804.09677419 1936.22191781
2004 1923.64516129 1893.72413793 1829.58064516 1855.7 1825.19354839 2004.3 2102.74193548 2069.06451613 2090.23333333 1883.03225806 1818.96666667 1838.61290323 1933.2109589
2005 1849.61290323 1898.75 1841.0 1856.13333333 1834.38709677 1938.2 1982.93548387 1983.09677419 2022.33333333 1819.96774194 1758.83333333 1765.29032258 1878.89041096
2006 1783.83870968 1833.57142857 1795.06451613 1738.33333333 1878.80645161 1882.7 1968.12903226 1952.4516129 2005.0 1855.38709677 1750.13333333 1672.74193548 1843.07945205
2007 1847.67741935 1826.42857143 1815.0 1706.5 1817.48387097 1916.6 1992.61290323 2018.22580645 2062.93333333 1918.70967742 1812.56666667 1776.22580645 1876.33424658
2008 1887.70967742 1840.34482759 1704.90322581 1834.93333333 1851.5483871 1943.76666667 2042.41935484 1965.29032258 2042.1 1834.09677419 1723.43333333 1708.12903226 1869.90136986
2009 1779.19354839 1788.82142857 1732.0 1772.56666667 1759.19354839 1891.86666667 2009.41935484 1931.35483871 1987.06666667 1766.4516129 1710.63333333 1737.70967742 1822.2630137
2010 1783.0 1796.92857143 1789.87096774 1734.0 1808.19354839 1917.7 1997.35483871 1930.48387097 2037.5 1897.29032258 1819.2 1773.83870968 1857.3890411
data <- read.csv('birth-transposed-2.csv', row.names=1)
months = c('January','February','March','April','May','June','July','August','September','October','November','December')
show_evolution <- function(i) {
x <- 1:length(data[,i])
y <- ts(data[,i] / data[,13], start=c(1950,1))*100-100
plot(y, xlab='', ylab='', cex.axis=0.8, frame=F,ylim=c(-13, 16), pch=20, cex=0.5, type='p')
abline(h=0, col='gray')
lines(lowess(y), col="#cc000066", lwd=4)
title(main=paste(months[i]))
}
par(mfrow=c(3,4))
for (i in 1:12) show_evolution(i)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment