{smcl} {txt}{sf}{ul off}{.-} name: {res} {txt}log: {res}K:\Eigene Dateien\abgeschlossen\telecom_regulation_competition\2016 BB Inflation\Submission IREE\data_analysis\prepare_data.smcl {txt}log type: {res}smcl {txt}opened on: {res}13 Apr 2018, 11:07:48 {txt} {com}. . drop if year == 2015 {txt}(34 observations deleted) {com}. compress {txt} (0 bytes saved) {com}. order iso_3 countryname year {txt} {com}. sort iso year {txt} {com}. . * set up panel . encode countryname , gen(co1) {txt} {com}. order co1 countryname year {txt} {com}. drop if co1 == . {txt}(0 observations deleted) {com}. xtset co1 year {res}{txt}{col 8}panel variable: {res}co1 (strongly balanced) {txt}{col 9}time variable: {res}{col 25}year, 1995 to 2014 {txt}{col 17}delta: {res}1 unit {txt} {com}. . **************** . * TIME DUMMIES . **************** . . * period dummies . gen time =. {txt}(680 missing values generated) {com}. replace time = 4 if year == 2010 | year == 2011 | year == 2012 | year == 2013 | year == 2014 {txt}(170 real changes made) {com}. replace time = 3 if year == 2005 | year == 2006 | year == 2007 | year == 2008 | year == 2009 {txt}(170 real changes made) {com}. replace time = 2 if year == 2000 | year == 2001 | year == 2002 | year == 2003 | year == 2004 {txt}(170 real changes made) {com}. replace time = 1 if year == 1995 | year == 1996 | year == 1997 | year == 1998 | year == 1999 {txt}(170 real changes made) {com}. tab time, gen(periodd) {txt}time {c |} Freq. Percent Cum. {hline 12}{c +}{hline 35} 1 {c |}{res} 170 25.00 25.00 {txt} 2 {c |}{res} 170 25.00 50.00 {txt} 3 {c |}{res} 170 25.00 75.00 {txt} 4 {c |}{res} 170 25.00 100.00 {txt}{hline 12}{c +}{hline 35} Total {c |}{res} 680 100.00 {txt} {com}. * crisis dummy . gen crisis = . {txt}(680 missing values generated) {com}. replace crisis = 1 if year > 2008 {txt}(204 real changes made) {com}. replace crisis = 0 if year < 2009 {txt}(476 real changes made) {com}. . sort countryname year {txt} {com}. . * DATA ISSUES WITH COUNTRIES . * UK dummy . gen ukdummy = . {txt}(680 missing values generated) {com}. replace ukdummy = 1 if iso_3 == "GBR" & year == 2007 {txt}(1 real change made) {com}. replace ukdummy = 0 if iso_3 == "GBR" & year != 2007 {txt}(19 real changes made) {com}. replace ukdummy = 0 if iso_3 != "GBR" {txt}(660 real changes made) {com}. * country cleaning (too short time series; no data on output gaps) . drop if countryname == "Chile" {txt}(20 observations deleted) {com}. drop if iso_3 == "SVN" {txt}(20 observations deleted) {com}. drop if iso_3 == "KOR" {txt}(20 observations deleted) {com}. drop if iso_3 == "TUR" {txt}(20 observations deleted) {com}. . ******************** . * DEFINE VARIABLES . ******************** . * Delta CPI . gen cpi = fp_cpi_totl_zg {txt} {com}. sort iso_3 year {txt} {com}. by iso_3: gen cpidiff = cpi - cpi[_n-1] {txt}(30 missing values generated) {com}. . * Penetration fixed . gen population = sp_pop_totl {txt} {com}. gen fixed = ( _I4213TFBB / population) *100 {txt}(149 missing values generated) {com}. by iso_3: gen fixeddiff = fixed - fixed[_n-1] {txt}(181 missing values generated) {com}. . * GDP GAP (OECD) . by iso_3, sort: gen gapoecddelta = gdp_gap_po_OECD - gdp_gap_po_OECD[_n-1] {txt}(72 missing values generated) {com}. by iso_3: gen gdpgapdiff = gdp_gap_po_OECD - gdp_gap_po_OECD[_n-1] {txt}(72 missing values generated) {com}. . * Raw materials index (HWWI, base year 2005) . by iso_3, sort: gen hwwidiff = hwwi_dollar_2005 - hwwi_dollar_2005[_n-1] {txt}(90 missing values generated) {com}. . * Foreign Exchange Basket . gen fx = px_rex_reer_2005 {txt}(20 missing values generated) {com}. by iso_3: gen fxdiff = fx - fx[_n-1] {txt}(49 missing values generated) {com}. . . * trade shares (goods and services) . gen tradeshare_goods = tg {txt}(7 missing values generated) {com}. by iso_3: gen tradegoodsdiff = tradeshare_goods - tradeshare_goods[_n-1] {txt}(37 missing values generated) {com}. . * for robustness checks . gen gdpgr = ny_gdp_mktp_kd_zg {txt}(2 missing values generated) {com}. gen gdppc = ny_gdp_mktp_kd {txt}(1 missing value generated) {com}. gen agri_share = nv_agr_totl_zs {txt}(46 missing values generated) {com}. . ******************** . * SAMPLE DESCRIPTION . ******************** . * Correlations . pwcorr cpi fixed gdp_gap_po_OECD tradeshare_goods hwwi_dollar fx if cpidiff != . & fixeddiff != . & gdpgapdiff != . & hwwidiff != . & fxdiff != . , sig {txt}{c |} cpi fixed gdp_ga~D trades~s hww~2005 fx {hline 13}{c +}{hline 54} cpi {c |} {res} 1.0000 {txt}{c |} {c |} fixed {c |} {res} -0.1669 1.0000 {txt}{c |}{res} 0.0011 {txt}{c |} gdp_gap_po~D {c |} {res} 0.2629 -0.2363 1.0000 {txt}{c |}{res} 0.0000 0.0000 {txt}{c |} tradeshare~s {c |} {res} 0.1686 0.0828 0.0426 1.0000 {txt}{c |}{res} 0.0010 0.1096 0.4110 {txt}{c |} hwwi_do~2005 {c |} {res} 0.0438 0.7813 -0.2356 0.1360 1.0000 {txt}{c |}{res} 0.3965 0.0000 0.0000 0.0084 {txt}{c |} fx {c |} {res} -0.2332 0.0951 0.0421 0.1897 0.2381 1.0000 {txt}{c |}{res} 0.0000 0.0650 0.4145 0.0002 0.0000 {txt}{c |} {com}. pwcorr cpidiff fixeddiff gdpgapdiff tradegoodsdiff hwwidiff fxdiff if cpidiff != . & fixeddiff != . & gdpgapdiff != . & hwwidiff != . & fxdiff != . , sig {txt}{c |} cpidiff fixedd~f gdpgap~f tradeg~f hwwidiff fxdiff {hline 13}{c +}{hline 54} cpidiff {c |} {res} 1.0000 {txt}{c |} {c |} fixeddiff {c |} {res} 0.0132 1.0000 {txt}{c |}{res} 0.7983 {txt}{c |} gdpgapdiff {c |} {res} 0.3759 0.2085 1.0000 {txt}{c |}{res} 0.0000 0.0000 {txt}{c |} tradegoods~f {c |} {res} 0.4432 0.0575 0.4818 1.0000 {txt}{c |}{res} 0.0000 0.2669 0.0000 {txt}{c |} hwwidiff {c |} {res} 0.5776 0.1073 0.5934 0.6223 1.0000 {txt}{c |}{res} 0.0000 0.0373 0.0000 0.0000 {txt}{c |} fxdiff {c |} {res} -0.0469 0.0730 0.1529 -0.1420 0.1739 1.0000 {txt}{c |}{res} 0.3635 0.1570 0.0029 0.0059 0.0007 {txt}{c |} {com}. . * Descriptives . tabstat cpidiff fixeddiff gdpgapdiff tradegoodsdiff hwwidiff fxdiff if cpidiff != . & fixeddiff != . & gdpgapdiff != . & hwwidiff != . & fxdiff != . & ukdummy != . , statistics ( n mean p50 min max) columns(statistics) {txt}{ralign 12:variable} {...} {c |} N mean p50 min max {hline 13}{c +}{hline 50} {ralign 12:cpidiff} {...} {c |}{...} {res} 377 -.1201843 -.0268924 -8.533443 7.614522 {txt}{ralign 12:fixeddiff} {...} {c |}{...} {res} 377 2.263357 1.848694 -12.41255 19.03263 {txt}{ralign 12:gdpgapdiff} {...} {c |}{...} {res} 377 -.3103167 .0855973 -9.817417 5.344656 {txt}{ralign 12:tradegoods~f} {...} {c |}{...} {res} 375 .7436928 .8954353 -31.58026 21.60353 {txt}{ralign 12:hwwidiff} {...} {c |}{...} {res} 377 10.26851 15.01836 -61.82095 43.52286 {txt}{ralign 12:fxdiff} {...} {c |}{...} {res} 377 .6263159 .8433838 -21.03251 16.77142 {txt}{hline 13}{c BT}{hline 50} {com}. . * Coverage . tab countryname if cpidiff != . & fixeddiff != . & gdpgapdiff != . & hwwidiff != . & fxdiff != . {txt}Country {c |} Freq. Percent Cum. {hline 16}{c +}{hline 35} Australia {c |}{res} 10 2.65 2.65 {txt} Austria {c |}{res} 14 3.71 6.37 {txt} Belgium {c |}{res} 15 3.98 10.34 {txt} Canada {c |}{res} 15 3.98 14.32 {txt} Czech Republic {c |}{res} 13 3.45 17.77 {txt} Denmark {c |}{res} 13 3.45 21.22 {txt} Finland {c |}{res} 13 3.45 24.67 {txt} France {c |}{res} 15 3.98 28.65 {txt} Germany {c |}{res} 13 3.45 32.10 {txt} Greece {c |}{res} 10 2.65 34.75 {txt} Hungary {c |}{res} 13 3.45 38.20 {txt} Iceland {c |}{res} 14 3.71 41.91 {txt} Ireland {c |}{res} 11 2.92 44.83 {txt} Israel {c |}{res} 12 3.18 48.01 {txt} Italy {c |}{res} 13 3.45 51.46 {txt} Japan {c |}{res} 15 3.98 55.44 {txt} Luxembourg {c |}{res} 12 3.18 58.62 {txt} Mexico {c |}{res} 13 3.45 62.07 {txt} Netherlands {c |}{res} 13 3.45 65.52 {txt} New Zealand {c |}{res} 13 3.45 68.97 {txt} Norway {c |}{res} 13 3.45 72.41 {txt} Poland {c |}{res} 12 3.18 75.60 {txt} Portugal {c |}{res} 14 3.71 79.31 {txt}Slovak Republic {c |}{res} 11 2.92 82.23 {txt} Spain {c |}{res} 13 3.45 85.68 {txt} Sweden {c |}{res} 13 3.45 89.12 {txt} Switzerland {c |}{res} 13 3.45 92.57 {txt} United Kingdom {c |}{res} 13 3.45 96.02 {txt} United States {c |}{res} 15 3.98 100.00 {txt}{hline 16}{c +}{hline 35} Total {c |}{res} 377 100.00 {txt} {com}. . ******************** . * graphs (Annex) . set scheme s2mono {txt} {com}. . #delimit ; {txt}delimiter now ; {com}. xtline cpi cpidiff , subtitle(,nobox) > graphregion(lcolor(white) fcolor(white) ifcolor(white) icolor(white) ) > plotregion( ifcolor(white) fcolor(white) lcolor(white) icolor(white) ) > legend (region(lpattern(blank)) bcolor(white) label(1 "CPI (annual change in %)") label(2 "CPI (annual change in %), 1st diff.") cols(2)) > bcolor(white) > ; {res}{txt} {com}. #delimit ; {txt}delimiter now ; {com}. xtline fixed fixeddiff, subtitle(,nobox) > graphregion(lcolor(white) fcolor(white) icolor(white) ) > plotregion( fcolor(white) lcolor(white) icolor(white) ) > legend (region(lpattern(blank)) bcolor(white) label(1 "Fixed b.b. penetration") label(2 "Fixed b.b. penetration, 1st diff.") cols(2)) > ; {res}{txt} {com}. #delimit ; {txt}delimiter now ; {com}. xtline cpidiff fixeddiff, subtitle(,nobox) > graphregion(lcolor(white) fcolor(white) icolor(white) ) > plotregion( fcolor(white) lcolor(white) icolor(white) ) > legend (region(lpattern(blank)) bcolor(white) > label(1 "CPI (annual change in %), 1st diff.") label(2 "Fixed b.b. penetration, 1st diff.") cols(2)) > ; {res}{txt} {com}. #delimit cr {txt}delimiter now cr {com}. . . ********* Original estimate: M.H. Yi, C. Choi / Journal of Policy Modeling 27 (2005) 885–889 . * log ratio . gen logfixed = log(fixed) {txt}(149 missing values generated) {com}. . * Growth of Quasi Money . by iso_3: gen m2gr_itu = (fm_lbl_mqmy_cn - fm_lbl_mqmy_cn[_n-1] ) / fm_lbl_mqmy_cn[_n-1] {txt}(466 missing values generated) {com}. . by iso_3: gen m2gr = (m2 - m2[_n-1] ) / m2[_n-1] {txt}(477 missing values generated) {com}. . * unemployment rate . gen unemp = sl_uem_totl_zs {txt} {com}. . * CLOSE LOG . log close {txt}name: {res} {txt}log: {res}K:\Eigene Dateien\abgeschlossen\telecom_regulation_competition\2016 BB Inflation\Submission IREE\data_analysis\prepare_data.smcl {txt}log type: {res}smcl {txt}closed on: {res}13 Apr 2018, 11:08:11 {txt}{.-} {smcl} {txt}{sf}{ul off}