* 製造業
* Fドライブのルートにデータのcsvファイルを置いた状態で実行
* 非製造業は下記のlogとinsheetを入れ替えて実行
* 変数名の末尾「L」は1期ラグを表す(uncerは1986以降のみ観測可能）

clear
*cd f:

log using manu70, text replace
*log using nonmanu260, text replace

set memory 50m
set more off

insheet using f:\manu70.csv
*insheet using f:\nonmanu260.csv

tabulate(year),gen(Dyear)

tsset number year

*Table1 (Table3)
tabstat i_k q debt uncer, by(year) statistics(n mean sd)

*Table2 (Table4)
xtivreg i_k Dyear2-Dyear21 (q=ql),fe first
xtivreg i_k debt Dyear2-Dyear21 (q=ql),fe first
xtivreg i_k uncer Dyear2-Dyear21 (q=ql),fe first
xtivreg i_k debt uncer Dyear2-Dyear21 (q=ql),fe first

log close

