Wooldridge Source: J. Shea (1993), “The Input-Output Approach to Instrument Selection,” Journal of Business and Economic Statistics 11, 145-156. Professor Shea kindly provided these data. Data loads lazily.
data('cement')
A data.frame with 312 observations on 30 variables:
year: 1964-1989
month: 1-12
prccem: BLS ppi for cement
ipcem: industrial prod. index, cement
prcpet: ppi for crude petroleum
rresc: real residential construction
rnonc: real nonres. construction
ip: aggregate index of indus. prod.
rdefs: real defense spending
milemp: military employment
gprc: log(prccem) - log(prccem[_n-1])
gcem: log(ipcem) - log(ipcem[_n-1])
gprcpet: log(prcpet) - log(prcpet[_n-1])
gres: log(rresc) - log(rresc[_n-1])
gnon: log(rnonc) - log(rnonc[_n-1])
gip: log(ip) - log(ip[_n-1])
gdefs: log(rdefs) - log(rdefs[_n-1])
gmilemp: log(milemp) - log(milemp[_n-1])
jan: =1 if month == 1
feb: =1 if month == 2
mar: =1 if month == 3
apr: =1 if month == 4
may: =1 if month == 5
jun: =1 if month == 6
jul: =1 if month == 7
aug: =1 if month == 8
sep: =1 if month == 9
oct: =1 if month == 10
nov: =1 if month == 11
dec: =1 if month == 12
https://www.cengage.com/cgi-wadsworth/course_products_wp.pl?fid=M20b&product_isbn_issn=9781111531041
Compared with Shea’s analysis, the producer price index (PPI) for fuels and power has been replaced with the PPI for petroleum. The data are monthly and have not been seasonally adjusted.
Used in Text: pages 579
#> 'data.frame': 312 obs. of 30 variables: #> $ year : int 1964 1964 1964 1964 1964 1964 1964 1964 1964 1964 ... #> $ month : int 1 2 3 4 5 6 7 8 9 10 ... #> $ prccem : int NA NA NA NA NA NA NA NA NA NA ... #> $ ipcem : num 0.474 0.531 0.643 0.826 1.027 ... #> $ prcpet : num 13.4 13.4 13.4 13.4 13.4 ... #> $ rresc : num 115401 115118 123663 116178 111034 ... #> $ rnonc : num 142180 144190 145577 150793 149259 ... #> $ ip : num 44.6 45.9 46.2 46.9 47.1 ... #> $ rdefs : num NA 1.66 1.66 1.66 1.66 ... #> $ milemp : int 2687 2696 2693 2694 2690 2687 2696 2693 2690 2680 ... #> $ gprc : num NA NA NA NA NA NA NA NA NA NA ... #> $ gcem : num NA 0.113 0.19 0.251 0.218 ... #> $ gprcpet: num NA 0 0 0 0 0 0 0 0 0 ... #> $ gres : num NA -0.00246 0.0716 -0.06244 -0.04529 ... #> $ gnon : num NA 0.01404 0.00957 0.0352 -0.01022 ... #> $ gip : num NA 0.02873 0.00651 0.01504 0.00426 ... #> $ gdefs : num NA NA -0.000481 0 -0.000963 ... #> $ gmilemp: num NA 0.003344 -0.001113 0.000371 -0.001486 ... #> $ jan : int 1 0 0 0 0 0 0 0 0 0 ... #> $ feb : int 0 1 0 0 0 0 0 0 0 0 ... #> $ mar : int 0 0 1 0 0 0 0 0 0 0 ... #> $ apr : int 0 0 0 1 0 0 0 0 0 0 ... #> $ may : int 0 0 0 0 1 0 0 0 0 0 ... #> $ jun : int 0 0 0 0 0 1 0 0 0 0 ... #> $ jul : int 0 0 0 0 0 0 1 0 0 0 ... #> $ aug : int 0 0 0 0 0 0 0 1 0 0 ... #> $ sep : int 0 0 0 0 0 0 0 0 1 0 ... #> $ oct : int 0 0 0 0 0 0 0 0 0 1 ... #> $ nov : int 0 0 0 0 0 0 0 0 0 0 ... #> $ dec : int 0 0 0 0 0 0 0 0 0 0 ... #> - attr(*, "time.stamp")= chr "25 Jun 2011 23:03"