温馨提示: 定期 清理浏览器缓存,可以获得最佳浏览体验。
作者:连玉君 (中山大学)
E-Mail: arlionn@163.com
目录
问题描述:
文章的样本区间为 1998-2017,需要以 2017 = 100 为准,计算各期的 CPI 指数,以便对所有原始财务变量进行平减,以消除通胀的影响。
*-------------------
*-CPI 指数数据
*-Source: 国家统计局
* http://data.stats.gov.cn/easyquery.htm?cn=C01&zb=A0902&sj=2017
* @ input: 1978==100, Range: 1998-2017
* @ output: 2017==100, Range: 1998-2017
*------------------------------------begin------
clear
#d ;
input cpi1978 ;
637.5 ; 627.5 ; 615.2 ; 606.7 ; 594.8 ; 579.7 ; 565.0 ; 536.1 ;
519.0 ; 522.7 ; 493.6 ; 471.0 ; 464.0 ; 455.8 ; 438.7 ; 433.5 ;
437.0 ; 434.0 ; 432.2 ; 438.4 ;
end ;
#d cr
egen year = seq(), from(2017) to(1998)
tsset year
gen p2017 = cpi1978[_N]
gen cpi2017 = cpi1978/p2017
label var cpi2017 "CPI, 2017=100"
keep year cpi2017
qui tsset
save "CPI2017.dta", replace
*------------------------------------over------
Note: 后续可以考虑写一个小程序,自动从国家统计局或其他途径下载指定时间区间和pinlde数据到 Stata 中。
可以在 Stata 里使用 ssc install cpigen
安装外部命令 cpigen
,在线获取 1913-2012 年期间的 CPI 数据,可以自行选择数据频率 (支持月度、季度和年度)。详情参见 help cpigen
。
webuse nlswork, clear
replace year=year+1900
cpigen
g nomwage=exp(ln_w)*cpi
su cpi if year==1978
g wage78=nomwage/cpi*r(mean)
la var wage78 "Real Wage, 1978 dollars"
g x=exp(_n/20-1) in 1/80
kdensity wage78 if year==1968, at(x) g(d68) nogr
kdensity wage78 if year==1978, at(x) g(d78) nogr
kdensity wage78 if year==1988, at(x) g(d88) nogr
la var d68 "1968 Wages"
la var d78 "1978 Wages"
la var d88 "1988 Wages"
twoway line d68 d78 d88 x, xsc(log) scheme(s2color)
连享会-直播课 上线了!
http://lianxh.duanshu.com
免费公开课:
直击面板数据模型 - 连玉君,时长:1小时40分钟 Stata 33 讲 - 连玉君, 每讲 15 分钟. 部分直播课 课程资料下载 (PPT,dofiles等)
支持回看,所有课程可以随时购买观看。
专题 | 嘉宾 | 直播/回看视频 |
---|---|---|
⭐ 最新专题 ⭐ | DSGE, 因果推断, 空间计量等 | |
⭕ Stata数据清洗 | 游万海 | 直播, 2 小时,已上线 |
研究设计 | 连玉君 | 我的特斯拉-实证研究设计,-幻灯片- |
面板模型 | 连玉君 | 动态面板模型,-幻灯片- |
面板模型 | 连玉君 | 直击面板数据模型 [免费公开课,2小时] |
Note: 部分课程的资料,PPT 等可以前往 连享会-直播课 主页查看,下载。
关于我们
课程, 直播, 视频, 客服, 模型设定, 研究设计, stata, plus, 绘图, 编程, 面板, 论文重现, 可视化, RDD, DID, PSM, 合成控制法
等
连享会小程序:扫一扫,看推文,看视频……
扫码加入连享会微信群,提问交流更方便
✏ 连享会学习群-常见问题解答汇总:
✨ https://gitee.com/arlionn/WD