代码拉取完成,页面将自动刷新
*! wid_example1 v1.0.2 Thomas Blanchet 20jun2017
// Plot the evolution of the pre-tax national income of the bottom 50% of the
// population in China, France and the United States since 1978 (in log scale)
program wid_example2
version 13
quietly {
preserve
// Download and store the 2016 USD PPP exchange rate
wid, indicators(xlcusp) areas(FR US CN) year(2016) clear
rename value ppp
tempfile ppp
save "`ppp'"
wid, indicators(aptinc) areas(FR US CN) perc(p0p50) year(1978/2016) ages(992) pop(j) clear
merge n:1 country using "`ppp'", nogenerate
// Convert to 2016 USD PPP (thousands)
replace value = value/ppp/1000
// Reshape and plot
keep country year value
reshape wide value, i(year) j(country) string
label variable valueFR "France"
label variable valueUS "United States"
label variable valueCN "China"
graph twoway line value* year, yscale(log) ylabel(1 2 5 10 20) ///
ytitle("2016 PPP USD (000')") ///
title("Average pre-tax national income of the bottom 50%") subtitle("equal-split adults") ///
note("Source: WID.world") legend(rows(1))
restore
}
end
此处可能存在不合适展示的内容,页面不予展示。您可通过相关编辑功能自查并修改。
如您确认内容无涉及 不当用语 / 纯广告导流 / 暴力 / 低俗色情 / 侵权 / 盗版 / 虚假 / 无价值内容或违法国家有关法律法规的内容,可点击提交进行申诉,我们将尽快为您处理。