Wooldridge Source: Economic Report of the President, various years. Data loads lazily.
data('wageprc')A data.frame with 286 observations on 20 variables:
price: consumer price index
wage: nominal hourly wage
t: time trend = 1, 2 , 3, ...
lprice: log(price)
lwage: log(wage)
gprice: lprice - lprice[_n-1]
gwage: lwage - lwage[_n-1]
gwage_1: gwage[_n-1]
gwage_2: gwage[_n-2]
gwage_3:
gwage_4:
gwage_5:
gwage_6:
gwage_7:
gwage_8:
gwage_9:
gwage_10:
gwage_11:
gwage_12:
gprice_1: gprice[_n-1]
https://www.cengage.com/cgi-wadsworth/course_products_wp.pl?fid=M20b&product_isbn_issn=9781111531041
These monthly data run from January 1964 through October 1987. The consumer price index averages to 100 in 1967.
Used in Text: pages 405, 444-445, 671.
str(wageprc)
#> 'data.frame': 286 obs. of 20 variables:
#> $ price : num 92.6 92.5 92.6 92.7 92.7 ...
#> $ wage : num 2.32 2.32 2.32 2.34 2.35 ...
#> $ t : int 1 2 3 4 5 6 7 8 9 10 ...
#> $ lprice : num 4.53 4.53 4.53 4.53 4.53 ...
#> $ lwage : num 0.842 0.842 0.842 0.85 0.854 ...
#> $ gprice : num NA -0.00108 0.00108 0.00108 0 ...
#> $ gwage : num NA 0 0 0.00858 0.00426 ...
#> $ gwage_1 : num NA NA 0 0 0.00858 ...
#> $ gwage_2 : num NA NA NA 0 0 ...
#> $ gwage_3 : num NA NA NA NA 0 ...
#> $ gwage_4 : num NA NA NA NA NA ...
#> $ gwage_5 : num NA NA NA NA NA ...
#> $ gwage_6 : num NA NA NA NA NA ...
#> $ gwage_7 : num NA NA NA NA NA NA NA NA 0 0 ...
#> $ gwage_8 : num NA NA NA NA NA NA NA NA NA 0 ...
#> $ gwage_9 : num NA NA NA NA NA NA NA NA NA NA ...
#> $ gwage_10: num NA NA NA NA NA NA NA NA NA NA ...
#> $ gwage_11: num NA NA NA NA NA NA NA NA NA NA ...
#> $ gwage_12: num NA NA NA NA NA NA NA NA NA NA ...
#> $ gprice_1: num NA NA -0.00108 0.00108 0.00108 ...
#> - attr(*, "time.stamp")= chr "25 Jun 2011 23:03"