? ===============================================================
?
?     U.S. Manufacturing Production Function.
?     Balanced Panel - read in all years at once.
?     Data from Table 3 (US) of Mairesse and Hall  (Jan. 1993)
?     Sales not adjusted for Materials.
?     This is a CRS version of sales per employee on capital
?     per employee, for simplicity.
?
?     If USBAL.DAT is not found, it needs to be uncompressed from
?     USBAL.EXE, by giving the command  USBAL  at the DOS prompt.
?
?     If you plan extensive use of this file, it will be more
?     efficient to create a databank, and reference it here with
?     an IN command.
?
supres @smpl ;
smpl 1 495 ;
read(file="usbal.dat",
   format="(f10.0,6f11.0/f9.0,5f11.0)")
   @id year sic2d logs79 logs2d79 logy79 logl79
   logc79 logn79 logk79 logm79 shmat79 logi79
   @id year sic2d logs80 logs2d80 logy80 logl80
   logc80 logn80 logk80 logm80 shmat80 logi80
   @id year sic2d logs81 logs2d81 logy81 logl81
   logc81 logn81 logk81 logm81 shmat81 logi81
   @id year sic2d logs82 logs2d82 logy82 logl82
   logc82 logn82 logk82 logm82 shmat82 logi82
   @id year sic2d logs83 logs2d83 logy83 logl83
   logc83 logn83 logk83 logm83 shmat83 logi83
   @id year sic2d logs84 logs2d84 logy84 logl84
   logc84 logn84 logk84 logm84 shmat84 logi84
   @id year sic2d logs85 logs2d85 logy85 logl85
   logc85 logn85 logk85 logm85 shmat85 logi85
   @id year sic2d logs86 logs2d86 logy86 logl86
   logc86 logn86 logk86 logm86 shmat86 logi86
   @id year sic2d logs87 logs2d87 logy87 logl87
   logc87 logn87 logk87 logm87 shmat87 logi87
   @id year sic2d logs88 logs2d88 logy88 logl88
   logc88 logn88 logk88 logm88 shmat88 logi88 ;
?
set n = @nob ;         ? Save the total number of observations.
set n1 = n-1 ;
set k = 6 ;           ? Number of X's. (years)
set m = 3 ;           ? Number of Y's. (years).
set npi = k*m ;       ? Number of PI's.
delete year ;         ? Don't need this variable for bal. panel.
?
?    Transform data and remove means.
?
dot 83-88 ;
  sl. = logs.-logl. ;
  cl. = logc.-logl. ;
  msd (noprint) sl. cl. ;
  unmake @mean slmean clmean ;
  sl. = sl.-slmean ;
  cl. = cl.-clmean ;
enddot ;
?
? ===============================================================