Wooldridge Source: L.A. Whittington, J. Alm, and H.E. Peters (1990), “Fertility and the Personal Exemption: Implicit Pronatalist Policy in the United States,” American Economic Review 80, 545-556. The data are given in the article. Data loads lazily.

data('fertil3')

Format

A data.frame with 72 observations on 24 variables:

  • gfr: births per 1000 women 15-44

  • pe: real value pers. exemption, $

  • year: 1913 to 1984

  • t: time trend, t=1,...,72

  • tsq: t^2

  • pe_1: pe[_n-1]

  • pe_2: pe[_n-2]

  • pe_3: pe[_n-3]

  • pe_4: pe[_n-4]

  • pill: =1 if year >= 1963

  • ww2: =1, 1941 to 1945

  • tcu: t^3

  • cgfr: change in gfr: gfr - gfr_1

  • cpe: pe - pe_1

  • cpe_1: cpe[_n-1]

  • cpe_2: cpe[_n-2]

  • cpe_3: cpe[_n-3]

  • cpe_4: cpe[_n-4]

  • gfr_1: gfr[_n-1]

  • cgfr_1: cgfr[_n-1]

  • cgfr_2: cgfr[_n-2]

  • cgfr_3: cgfr[_n-3]

  • cgfr_4: cgfr[_n-4]

  • gfr_2: gfr[_n-2]

Used in Text

pages 358, 377, 378, 397-398, 401, 408, 441, 649, 664-665, 673

Examples

 str(fertil3)
#> 'data.frame':	72 obs. of  24 variables:
#>  $ gfr   : num  125 127 125 123 121 ...
#>  $ pe    : num  0 0 0 0 19.3 ...
#>  $ year  : int  1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 ...
#>  $ t     : int  1 2 3 4 5 6 7 8 9 10 ...
#>  $ tsq   : int  1 4 9 16 25 36 49 64 81 100 ...
#>  $ pe_1  : num  NA 0 0 0 0 ...
#>  $ pe_2  : num  NA NA 0 0 0 ...
#>  $ pe_3  : num  NA NA NA 0 0 ...
#>  $ pe_4  : num  NA NA NA NA 0 ...
#>  $ pill  : int  0 0 0 0 0 0 0 0 0 0 ...
#>  $ ww2   : int  0 0 0 0 0 0 0 0 0 0 ...
#>  $ tcu   : num  1 8 27 64 125 216 343 512 729 1000 ...
#>  $ cgfr  : num  NA 1.9 -1.6 -1.6 -2.4 ...
#>  $ cpe   : num  NA 0 0 0 19.3 ...
#>  $ cpe_1 : num  NA NA 0 0 0 ...
#>  $ cpe_2 : num  NA NA NA 0 0 ...
#>  $ cpe_3 : num  NA NA NA NA 0 ...
#>  $ cpe_4 : num  NA NA NA NA NA ...
#>  $ gfr_1 : num  NA 125 127 125 123 ...
#>  $ cgfr_1: num  NA NA 1.9 -1.6 -1.6 ...
#>  $ cgfr_2: num  NA NA NA 1.9 -1.6 ...
#>  $ cgfr_3: num  NA NA NA NA 1.9 ...
#>  $ cgfr_4: num  NA NA NA NA NA ...
#>  $ gfr_2 : num  NA NA 125 127 125 ...
#>  - attr(*, "time.stamp")= chr "25 Jun 2011 23:03"