|
clear
input str20 se str20 ebit str20 oi str20 ns str20 td str20 nta str20 ta
2588.14K -6377.19K -4238.99K 0 331782.8 8709.43K 10028.30K
1546.03K -1777.06K -1550.65K 0 558161.6 27837.84K 30800.53K
1768.41K -442.20K -2007.76K 0 0 92530.06K 93334.67K
2805.87K -2631.15K -2672.03K 160956.6 0 1034.34K 1228.83K
5083.50K -5401.59K -5336.35K 0 50908.23 4616.50K 4878.31K
952811.5 -10420.95K -972.91K 0 0 2626.02K 2824.02K
12105.82K 6745.99K -12105.82K 0 595217.90K 3005.85M 3609.29M
747614.9 -734.92K -964.14K 0 0 27632.35K 27727.30K
516022.30K -224.84M 236017.40K 3227.73M 1112.72M 1324.15M 3723.88M
695092.4 -1847.20K -1054.04K 0 0 614297.6 692204.5
163506.3 -490.15K -490.15K 0 0 3472.36K 4501.32K
3747.60K -8395.44K -4632.75K 0 10668.83 17351.81K 17543.55K
end
compress
foreach v of varlist se-ta{
gen `v'_a = `v'
replace `v'_a = subinstr(`v'_a, "K", "", .)
replace `v'_a = subinstr(`v'_a, "M", "", .)
gen `v'_num = real(`v'_a)
replace `v'_num = `v'_num*1000 if strmatch(`v', "*M*")
replace `v'_num = `v'_num/1000 if ~strmatch(`v', "*M*")&~strmatch(`v', "*K*")
}
aorder
browse // pls check!
*keep *_num // get the final results
*----Results
ebit_num ns_num nta_num oi_num se_num ta_num td_num
-6377.19 0 8709.43 -4238.99 2588.14 10028.3 331.7828
-1777.06 0 27837.84 -1550.65 1546.03 30800.53 558.1616
-442.2 0 92530.06 -2007.76 1768.41 93334.67 0
-2631.15 160.9566 1034.34 -2672.03 2805.87 1228.83 0
-5401.59 0 4616.5 -5336.35 5083.5 4878.31 50.90823
-10420.95 0 2626.02 -972.91 952.8115 2824.02 0
6745.99 0 3005850 -12105.82 12105.82 3609290 595217.9
-734.92 0 27632.35 -964.14 747.6149 27727.3 0
-224840 3227730 1324150 236017.4 516022.3 3723880 1112720
-1847.2 0 614.2976 -1054.04 695.0924 692.2045 0
-490.15 0 3472.36 -490.15 163.5063 4501.32 0
-8395.44 0 17351.81 -4632.75 3747.6 17543.55 10.66883
|