-
Notifications
You must be signed in to change notification settings - Fork 0
/
0_create_fake_data.do
78 lines (62 loc) · 1.89 KB
/
0_create_fake_data.do
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
global path "C:\Users\clair\Documents\Github\simul-ppa"
** Individual table
import excel using "${path}\assets\varlist_fideli_2017.xlsx", firstrow sheet("fideli_individu17_diff_1") clear
keep name label modalites
save "${path}\assets\varlist_fideli_individu17_diff_1", replace
local nb_var = _N
forval i = 1/`nb_var'{
local name = name[`i']
gen `name' = runiform() *1000
if substr("`name'", 1, 2) == "id"{
drop `name'
}
if modalites[`i'] != "" {
tostring(`name'), replace force
replace `name' = subinstr(`name', ".", "", 1)
}
}
drop name label modalites
gen id_ind = _n
local nb_men = int(_N / 3)
gen id_log = runiformint(1,`nb_men')
order id_ind id*
sort id_log id_ind
save "${path}\data\fideli_individu17_diff_1", replace
***
import excel using "${path}\assets\varlist_fideli_2017.xlsx", firstrow sheet("fideli_local17_diff_1") clear
keep name label modalites
save "${path}\assets\varlist_fideli_local17_diff_1", replace
local nb_var = _N
forval i = 1/`nb_var'{
local name = name[`i']
gen `name' = runiform() *1000
if substr("`name'", 1, 2) == "id"{
tostring(`name'), replace force
replace `name' = subinstr(`name', ".", "", 1)
}
if modalites[`i'] != "" {
tostring(`name'), replace force
replace `name' = subinstr(`name', ".", "", 1)
}
}
drop name label modalites
drop if _n >= 1
merge
order id*
save "${path}\data\fideli_local17_diff_1", replace
***
import excel using "${path}\assets\varlist_fideli_2017.xlsx", firstrow sheet("fideli_revenus_filosofi17") clear
keep name label modalites
save "${path}\assets\varlist_fideli_revenus_filosofi17", replace
local nb_var = _N
forval i = 1/`nb_var'{
local name = name[`i']
gen `name' = runiform() *1000
if substr("`name'", 1, 2) == "id"{
tostring(`name'), replace force
replace `name' = subinstr(`name', ".", "", 1)
}
}
drop name label modalites
order id*
save "${path}\data\fideli_revenus_filosofi17", replace