-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathGECKOTeamRegistratio-SiteSurveyDataNeil_R_2024-03-25_1128.r
298 lines (262 loc) · 57.8 KB
/
GECKOTeamRegistratio-SiteSurveyDataNeil_R_2024-03-25_1128.r
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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
library(finalfit)
library(magrittr)
#Setting Units
#Setting Factors(will create new variable for factors)
data$redcap_data_access_group = factor(data$redcap_data_access_group,levels=c("ae_1385","ae_1395","ae_1473","ae_1888","ae_2357","ae_2910","ae_3146","ae_3271","ae_3464","ae_3695","ae_3728","ae_3951","ae_4734","af_1598","af_3286","al_141","al_1480","al_1791","al_2148","al_361","ar_1680","ar_1755","ar_1872","ar_1955","ar_1974","ar_2137","ar_2161","ar_2307","ar_2442","ar_2462","ar_2583","ar_2730","ar_2773","ar_2802","ar_301","ar_3181","ar_3572","ar_3851","ar_3884","ar_4302","ar_4419","ar_4733","ar_480","ar_4902","ar_625","ar_838","ar_860","at_1748","at_2305","at_2403","at_3187","at_3241","at_4458","au_1025","au_1026","au_1030","au_1031","au_1048","au_1059","au_1140","au_1141","au_1145","au_1148","au_1153","au_1157","au_1203","au_1250","au_13","au_1311","au_1312","au_1343","au_1425","au_1493","au_15","au_1551","au_1552","au_1572","au_159","au_160","au_1637","au_166","au_1670","au_17","au_1712","au_1713","au_1714","au_1739","au_1751","au_1752","au_1753","au_1799","au_1859","au_20","au_2156","au_218","au_2252","au_2253","au_250","au_2538","au_26","au_2734","au_274","au_2745","au_2884","au_3293","au_3360","au_4239","au_4399","au_4410","au_454","au_56","au_58","au_623","au_651","au_665","au_670","au_671","au_678","au_679","au_704","au_732","au_74","au_762","au_79","au_856","au_857","au_870","aw_2015","aw_352","az_1238","az_1244","az_1260","az_1261","az_1262","az_1264","az_1265","az_1354","az_1771","az_3330","az_529","az_819","ba_1275","ba_1276","ba_1277","ba_1499","ba_246","ba_3082","ba_338","bd_1688","bd_186","bd_2226","bd_2637","bd_3983","bd_4024","bd_680","be_1099","be_1821","be_1900","be_336","be_703","bf_641","bg_2144","bg_2150","bg_227","bg_2416","bg_3061","bg_3220","bg_325","bg_339","bg_3536","bg_494","bg_609","bg_622","bg_731","bg_913","bh_2039","bh_404","bi_1161","bi_2138","bi_244","bj_1359","bj_1396","bj_1863","bj_2105","bj_2362","bj_2363","bj_2365","bj_2366","bj_2367","bj_2368","bj_2370","bj_2371","bj_2410","bj_3543","bj_3773","bo_1223","bo_650","br_1371","br_1407","br_1442","br_1777","br_1973","br_1984","br_2073","br_2240","br_2448","br_2457","br_2619","br_2634","br_2635","br_2639","br_2704","br_3046","br_3085","br_3645","br_3718","br_406","br_537","br_538","br_85","bt_112","bw_724","by_1289","by_3764","ca_1049","ca_1082","ca_1630","ca_1904","ca_1976","ca_2555","ca_2732","ca_2736","ca_397","ca_405","ca_812","cd_3011","ch_1081","ch_1270","ch_1404","ch_2229","ch_2271","ch_2283","ch_2500","ch_2606","ch_293","ch_3280","ch_3442","ch_363","ch_388","ch_4398","ch_485","ch_492","ch_717","ch_761","cl_1087","cl_1197","cl_2411","cl_2898","cl_4466","cm_1255","cm_1459","cm_2026","cm_2551","cm_3775","cm_677","cn_1916","cn_22","cn_23","cn_2716","cn_3292","cn_365","cn_3692","co_1020","co_129","co_1296","co_1297","co_1546","co_1638","co_2166","co_2217","co_2656","co_3093","co_3282","co_3428","co_3438","co_3439","co_3676","co_3685","co_3906","co_399","co_3999","co_4051","co_4337","co_4434","co_4469","co_682","co_751","co_752","co_892","cy_2516","cy_31","cy_3581","cy_3696","cy_536","cz_1950","cz_2185","cz_2467","cz_2616","cz_2713","cz_3119","cz_3172","cz_836","cz_896","de_1052","de_1118","de_1426","de_1449","de_1648","de_1702","de_1759","de_191","de_196","de_2080","de_2085","de_221","de_2353","de_2437","de_2743","de_2972","de_3106","de_3108","de_3177","de_3206","de_4124","de_4213","de_426","de_4758","de_491","de_694","de_849","dk_3993","dk_4357","dk_508","do_1021","do_572","dz_1100","dz_1428","dz_146","dz_1565","dz_2576","dz_3147","dz_4483","dz_4487","dz_4554","dz_4751","ec_1131","ec_1366","ec_1641","ec_1938","ec_2263","ec_2578","ec_2673","ec_2956","ec_3095","ec_4147","ec_4220","ec_4295","ec_852","ec_929","ee_4385","eg_1005","eg_1037","eg_1047","eg_1083","eg_1096","eg_1123","eg_116","eg_1169","eg_118","eg_1236","eg_1582","eg_162","eg_1695","eg_1822","eg_2122","eg_224","eg_2242","eg_236","eg_2428","eg_2461","eg_2468","eg_2476","eg_2491","eg_2558","eg_265","eg_2833","eg_2857","eg_2859","eg_2949","eg_2957","eg_3152","eg_3309","eg_35","eg_3561","eg_3766","eg_377","eg_4066","eg_4067","eg_4074","eg_412","eg_423","eg_456","eg_46","eg_4698","eg_4882","eg_517","eg_525","eg_567","eg_602","eg_646","eg_655","eg_657","eg_663","eg_664","eg_690","eg_696","eg_786","eg_87","eg_935","es_1105","es_1242","es_1400","es_1483","es_158","es_1593","es_1615","es_1629","es_1693","es_1763","es_1796","es_1977","es_1993","es_201","es_2019","es_2092","es_210","es_2102","es_213","es_2147","es_2153","es_2173","es_2176","es_2194","es_2216","es_2272","es_2324","es_24","es_2602","es_2618","es_2625","es_263","es_27","es_2729","es_279","es_2871","es_2930","es_2931","es_3021","es_3219","es_3541","es_3545","es_3714","es_3748","es_3830","es_3832","es_387","es_3927","es_3964","es_407","es_4084","es_4099","es_4121","es_416","es_4186","es_440","es_4624","es_4761","es_512","es_551","es_599","es_738","es_749","es_757","es_775","es_776","es_80","es_830","es_844","es_894","es_897","es_975","es_977","es_989","et_1000","et_1065","et_114","et_1243","et_1300","et_1304","et_132","et_1363","et_1369","et_1518","et_1699","et_170","et_173","et_295","et_342","et_3450","et_3595","et_3865","et_3866","et_3962","et_4298","et_435","et_588","et_649","et_777","et_899","et_927","et_928","et_997","fi_1455","fi_1862","fi_360","fj_3984","fr_1183","fr_1248","fr_128","fr_1291","fr_1500","fr_1573","fr_1585","fr_1621","fr_1636","fr_1758","fr_2273","fr_2493","fr_2532","fr_2610","fr_2655","fr_2706","fr_3102","fr_3151","fr_3159","fr_3687","fr_4552","fr_4700","fr_907","ga_3279","ga_3682","gb_1016","gb_1024","gb_1034","gb_1038","gb_1098","gb_1112","gb_1121","gb_1172","gb_1173","gb_1213","gb_1217","gb_122","gb_1221","gb_1222","gb_1227","gb_1233","gb_1241","gb_1253","gb_1282","gb_1287","gb_1288","gb_1305","gb_1317","gb_1390","gb_1422","gb_1438","gb_1445","gb_148","gb_1503","gb_1506","gb_1519","gb_1541","gb_1543","gb_1553","gb_1581","gb_1608","gb_1611","gb_1613","gb_1628","gb_1647","gb_1649","gb_1658","gb_1691","gb_1749","gb_1772","gb_180","gb_1823","gb_1844","gb_187","gb_189","gb_1913","gb_1914","gb_1947","gb_1951","gb_1960","gb_1972","gb_2017","gb_204","gb_2055","gb_2059","gb_207","gb_2112","gb_2196","gb_2197","gb_2198","gb_2230","gb_2232","gb_2313","gb_2391","gb_2436","gb_2507","gb_2537","gb_2589","gb_261","gb_2620","gb_2645","gb_2667","gb_278","gb_284","gb_2899","gb_2975","gb_3005","gb_3054","gb_306","gb_3084","gb_3107","gb_3123","gb_314","gb_3149","gb_3235","gb_3259","gb_3300","gb_3308","gb_3312","gb_3316","gb_3321","gb_3326","gb_3327","gb_3366","gb_3457","gb_3463","gb_3505","gb_3642","gb_3702","gb_3704","gb_3724","gb_3727","gb_3739","gb_375","gb_3761","gb_3776","gb_3777","gb_379","gb_3790","gb_3797","gb_3834","gb_3852","gb_3861","gb_3877","gb_3902","gb_3914","gb_3987","gb_3988","gb_4038","gb_4114","gb_4127","gb_4151","gb_420","gb_431","gb_4396","gb_464","gb_465","gb_470","gb_4740","gb_4824","gb_4876","gb_4889","gb_544","gb_554","gb_557","gb_559","gb_597","gb_600","gb_610","gb_637","gb_643","gb_656","gb_715","gb_727","gb_73","gb_739","gb_796","gb_806","gb_843","gb_858","gb_880","gb_893","gb_98","ge_3550","ge_3551","ge_463","gh_1302","gh_2611","gh_3127","gh_3470","gh_3499","gh_3820","gh_4171","gh_4225","gh_4567","gh_4595","gh_785","gh_790","gh_826","gh_845","gm_3546","gr_1010","gr_1028","gr_1039","gr_1053","gr_1072","gr_1075","gr_1086","gr_111","gr_1124","gr_1180","gr_127","gr_1360","gr_1482","gr_152","gr_1554","gr_1602","gr_1655","gr_1694","gr_185","gr_1893","gr_1894","gr_1931","gr_1997","gr_200","gr_2083","gr_2202","gr_2281","gr_2303","gr_2335","gr_245","gr_264","gr_289","gr_303","gr_3086","gr_3089","gr_3478","gr_3627","gr_371","gr_378","gr_3821","gr_3979","gr_40","gr_4029","gr_414","gr_43","gr_482","gr_487","gr_577","gr_582","gr_591","gr_638","gr_640","gr_755","gr_766","gr_823","gr_833","gr_84","gr_854","gr_942","gt_1187","gt_1986","gt_277","gt_4360","gt_4361","gt_4898","gw_943","hk_1239","hk_3837","hk_3838","hn_1773","hn_1784","hn_2593","hn_547","hr_1234","hr_1681","hr_1730","hr_2077","hr_2379","hr_2520","hr_2675","hr_2967","hr_3440","hr_4619","hr_507","hu_1609","hu_1792","hu_2003","hu_2006","hu_2731","hu_3631","id_1199","id_1201","id_1286","id_1319","id_1339","id_1413","id_1481","id_169","id_178","id_1924","id_2544","id_2595","id_861","ie_1163","ie_1226","ie_1281","ie_1646","ie_2111","ie_2290","ie_2550","ie_2552","ie_2591","ie_2623","ie_2723","ie_2984","ie_3178","ie_3332","ie_3398","ie_3538","ie_3735","ie_3736","ie_3737","ie_4712","ie_642","ie_957","il_1328","il_1812","il_2067","il_2513","il_2668","il_3067","il_3339","il_3413","il_481","in_1022","in_1056","in_1062","in_1094","in_1097","in_1146","in_1167","in_1176","in_1224","in_1232","in_1298","in_1333","in_1349","in_1350","in_1388","in_139","in_1432","in_1435","in_1436","in_144","in_149","in_1508","in_1537","in_1587","in_1817","in_183","in_1843","in_1847","in_1870","in_1884","in_1899","in_1919","in_1934","in_1979","in_1996","in_202","in_2109","in_214","in_2143","in_2172","in_2183","in_2209","in_2309","in_2311","in_2348","in_2376","in_2395","in_2396","in_2399","in_2414","in_2418","in_2425","in_2488","in_2499","in_2515","in_2518","in_2527","in_254","in_2570","in_2571","in_2574","in_2696","in_2733","in_2748","in_2823","in_2945","in_317","in_3186","in_321","in_328","in_3336","in_334","in_3371","in_3420","in_3443","in_3474","in_3476","in_3503","in_3504","in_3577","in_390","in_4104","in_4169","in_4174","in_4232","in_4285","in_4344","in_442","in_4437","in_4563","in_4566","in_4599","in_4744","in_4766","in_4793","in_4815","in_4890","in_518","in_521","in_666","in_700","in_709","in_810","in_814","in_828","in_846","in_864","in_902","in_906","in_93","in_95","in_958","in_961","iq_1348","iq_2076","iq_2580","iq_2796","iq_2892","iq_3116","iq_316","iq_3556","iq_3968","iq_4082","iq_4205","iq_4409","iq_446","iq_451","iq_871","ir_1513","ir_2045","ir_4138","ir_4732","ir_585","ir_784","ir_868","ir_900","is_1936","is_2326","is_3157","it_1103","it_1104","it_1152","it_1162","it_1215","it_1246","it_125","it_1308","it_131","it_1316","it_1326","it_1330","it_1331","it_1332","it_1334","it_1338","it_1346","it_1356","it_136","it_1387","it_1399","it_140","it_1403","it_1411","it_1419","it_150","it_1538","it_1548","it_1560","it_1562","it_1571","it_1574","it_1599","it_168","it_1683","it_1701","it_171","it_176","it_1776","it_1793","it_1815","it_1921","it_1935","it_198","it_1980","it_2002","it_2020","it_2038","it_205","it_2069","it_2120","it_217","it_2180","it_219","it_2204","it_2214","it_2218","it_2234","it_229","it_2291","it_231","it_234","it_2342","it_2346","it_2358","it_2400","it_2438","it_2469","it_2470","it_2511","it_2521","it_2567","it_2612","it_2613","it_2621","it_2643","it_2648","it_2663","it_268","it_271","it_2726","it_2758","it_283","it_2864","it_2966","it_299","it_3027","it_3034","it_3036","it_305","it_3140","it_3175","it_3258","it_3365","it_3374","it_340","it_3408","it_3427","it_3432","it_3488","it_3512","it_3514","it_3516","it_3518","it_353","it_3544","it_3571","it_36","it_3667","it_37","it_3700","it_3706","it_38","it_3815","it_3912","it_3928","it_395","it_3985","it_401","it_4013","it_402","it_4088","it_4122","it_4315","it_4330","it_4379","it_438","it_4413","it_4451","it_4583","it_4617","it_4623","it_4627","it_467","it_4719","it_474","it_475","it_4764","it_478","it_4873","it_4894","it_493","it_499","it_519","it_523","it_570","it_580","it_590","it_594","it_612","it_62","it_631","it_633","it_647","it_69","it_692","it_70","it_705","it_708","it_721","it_733","it_743","it_767","it_773","it_781","it_789","it_791","it_798","it_809","it_811","it_827","it_873","it_887","it_889","it_903","it_905","it_909","it_916","it_919","it_92","it_920","it_940","it_949","it_964","it_969","it_988","it_995","jm_3077","jo_115","jo_1341","jo_1910","jo_192","jo_199","jo_2107","jo_2162","jo_2208","jo_2285","jo_2310","jo_2429","jo_2441","jo_2805","jo_29","jo_30","jo_3347","jo_3549","jo_3669","jo_4306","jo_486","jo_553","jo_653","jo_710","jo_918","jp_1093","jp_1381","jp_2190","jp_253","jp_2980","jp_3028","jp_4327","ke_1200","ke_1662","ke_1797","ke_1866","ke_2201","ke_2585","ke_2896","ke_4020","ke_531","ke_540","ke_740","ke_799","ke_815","kh_1754","kr_1092","kr_2982","kw_1452","kw_1786","kw_2624","kw_2630","kw_2633","kw_2647","kw_2711","kw_2721","kz_1437","kz_1566","kz_2660","kz_2661","kz_4040","lb_1283","lb_2279","lb_2934","lb_3035","lb_3378","lb_479","lk_1041","lk_105","lk_251","lk_3230","lk_528","lk_539","lk_675","lk_718","lr_2236","lr_959","lt_1231","lt_247","lt_2725","lt_3479","lt_4343","lt_556","lu_635","lv_1476","lv_3559","lv_3703","lv_730","ly_1061","ly_1128","ly_1251","ly_1358","ly_1515","ly_1520","ly_1623","ly_1685","ly_1757","ly_197","ly_1985","ly_2082","ly_209","ly_2134","ly_2838","ly_2845","ly_2853","ly_2861","ly_3050","ly_3209","ly_3358","ly_3380","ly_3392","ly_347","ly_425","ly_4311","ly_4433","ly_4475","ly_4872","ly_862","ly_931","ma_101","ma_1135","ma_1672","ma_2097","ma_2443","ma_2548","ma_2622","ma_3285","ma_41","ma_4838","ma_619","ma_875","mg_1597","mg_2071","mk_1220","mk_177","mk_3856","mn_3243","mn_484","mo_3260","mt_541","mv_716","mx_1019","mx_1064","mx_1068","mx_1071","mx_1088","mx_1185","mx_1198","mx_1321","mx_1345","mx_1622","mx_1624","mx_1696","mx_1710","mx_1716","mx_1787","mx_1834","mx_1857","mx_1898","mx_1908","mx_2000","mx_2123","mx_2219","mx_2238","mx_2415","mx_2419","mx_2424","mx_2430","mx_2445","mx_2463","mx_2477","mx_2481","mx_2562","mx_2566","mx_2575","mx_2631","mx_2879","mx_2908","mx_2914","mx_2924","mx_3048","mx_3064","mx_3150","mx_3158","mx_3167","mx_3169","mx_3171","mx_3274","mx_3281","mx_330","mx_3313","mx_3334","mx_3359","mx_3456","mx_3565","mx_357","mx_3586","mx_364","mx_3672","mx_3688","mx_422","mx_4471","mx_4530","mx_4531","mx_4594","mx_460","mx_4629","mx_476","mx_520","mx_581","mx_586","mx_595","mx_630","mx_644","mx_667","mx_808","mx_835","mx_933","mx_947","mx_968","my_1066","my_1154","my_1279","my_1285","my_1336","my_1424","my_1463","my_1466","my_1527","my_1665","my_1678","my_1994","my_2086","my_2199","my_2446","my_249","my_2496","my_256","my_286","my_59","my_863","mz_1478","na_3523","na_3525","na_372","na_908","ne_2124","ne_2577","ne_3935","ng_1018","ng_1076","ng_1247","ng_1382","ng_1434","ng_1567","ng_163","ng_1850","ng_188","ng_1957","ng_1995","ng_211","ng_2211","ng_2275","ng_2387","ng_239","ng_2390","ng_2398","ng_2420","ng_2422","ng_2573","ng_258","ng_2654","ng_2686","ng_285","ng_3031","ng_3099","ng_318","ng_3257","ng_329","ng_3297","ng_3298","ng_345","ng_3885","ng_415","ng_434","ng_4369","ng_552","ng_608","ng_674","ng_748","ng_842","ng_97","ni_3238","ni_3495","ni_4576","nl_1058","nl_1867","nl_1890","nl_2195","nl_4120","nl_4841","no_1398","no_1659","no_2149","no_2681","no_2824","no_3168","no_358","no_4401","no_4903","np_1468","np_1905","np_1956","np_3052","nz_108","nz_1353","nz_1783","nz_1881","nz_2154","nz_2916","nz_3404","nz_4057","nz_4059","nz_596","nz_941","nz_944","nz_970","om_2490","om_343","om_4191","om_524","pa_138","pa_2009","pe_1307","pe_1367","pe_157","pe_1607","pe_1612","pe_1750","pe_1828","pe_1830","pe_1836","pe_1852","pe_1871","pe_1917","pe_1918","pe_2175","pe_2482","pe_2909","pe_2941","pe_297","pe_3130","pe_3208","pe_3210","pe_3268","pe_3284","pe_3522","pe_3759","pe_3784","pe_3864","pe_3911","pe_3917","pe_3976","pe_3977","pe_4060","pe_4100","pe_4154","pe_4283","pe_4304","pe_4415","pe_530","pe_683","ph_1195","ph_1202","ph_1230","ph_1318","ph_1570","ph_1639","ph_1729","ph_1809","ph_182","ph_2494","ph_2614","ph_3673","ph_368","ph_3717","ph_3882","ph_3903","ph_3972","ph_4102","ph_418","ph_722","pk_1032","pk_1113","pk_1132","pk_121","pk_1324","pk_137","pk_1379","pk_1389","pk_1406","pk_1409","pk_1453","pk_1460","pk_1467","pk_1470","pk_1477","pk_1533","pk_1557","pk_161","pk_1643","pk_1737","pk_174","pk_1780","pk_1790","pk_1795","pk_1800","pk_1887","pk_1926","pk_1998","pk_2013","pk_2103","pk_222","pk_2248","pk_2257","pk_2464","pk_2684","pk_2710","pk_2929","pk_3041","pk_307","pk_32","pk_3254","pk_3304","pk_3454","pk_3531","pk_3564","pk_3576","pk_3589","pk_3658","pk_381","pk_3836","pk_3842","pk_39","pk_3921","pk_3936","pk_3937","pk_4316","pk_4412","pk_4435","pk_4598","pk_500","pk_63","pk_676","pk_688","pk_753","pk_760","pk_764","pk_787","pk_801","pk_825","pk_866","pk_90","pk_921","pk_924","pl_1035","pl_1084","pl_145","pl_1673","pl_1741","pl_2028","pl_2066","pl_2200","pl_3223","pl_3381","pl_4523","pl_587","ps_1337","ps_156","ps_21","ps_2287","ps_276","ps_2795","ps_291","ps_3124","ps_3142","ps_4159","ps_4173","ps_4248","ps_516","ps_979","pt_1063","pt_1139","pt_1156","pt_1170","pt_1368","pt_1386","pt_1487","pt_1583","pt_1586","pt_1601","pt_1614","pt_1744","pt_1747","pt_1761","pt_1798","pt_1810","pt_1869","pt_1903","pt_1970","pt_1992","pt_2116","pt_2135","pt_2136","pt_2170","pt_2269","pt_2320","pt_2669","pt_3090","pt_3176","pt_3229","pt_394","pt_4216","pt_461","pt_502","pt_505","pt_527","pt_772","pt_805","pt_850","pt_86","py_1375","py_1376","py_1590","py_1940","py_2140","py_2212","py_2406","py_3075","py_382","py_3839","py_925","qa_1258","qa_143","qa_2247","qa_3480","ro_1440","ro_1645","ro_1675","ro_1839","ro_1846","ro_1873","ro_195","ro_2378","ro_242","ro_243","ro_2502","ro_2829","ro_3016","ro_3384","ro_366","ro_421","ro_436","ro_441","ro_45","ro_526","ro_71","ro_839","ro_872","ro_882","rs_2081","rs_2210","rs_2227","rs_2421","rs_2557","rs_3816","rs_4223","rs_477","rs_4839","rs_503","rs_639","rs_759","ru_1667","ru_18","ru_1827","ru_2036","ru_2268","ru_2293","ru_2318","ru_2377","ru_2388","ru_3250","ru_4009","ru_706","ru_765","ru_782","ru_792","rw_1042","rw_1107","rw_1109","rw_1110","rw_1111","rw_1116","rw_1591","rw_1594","rw_1619","rw_561","rw_869","sa_1023","sa_1043","sa_1558","sa_172","sa_181","sa_1855","sa_1912","sa_203","sa_2096","sa_2160","sa_2484","sa_252","sa_273","sa_2793","sa_2819","sa_2993","sa_2996","sa_2999","sa_3012","sa_3026","sa_313","sa_3162","sa_3273","sa_3397","sa_369","sa_3803","sa_3823","sa_3908","sa_4130","sa_437","sa_4371","sa_4569","sa_4605","sa_513","sa_522","sa_723","sa_75","sa_81","sd_1106","sd_1117","sd_1430","sd_1807","sd_2785","sd_2801","sd_2918","sd_3155","sd_3212","sd_3560","sd_3711","sd_3763","sd_3879","sd_4052","sd_4081","sd_4374","sd_4485","sd_4490","sd_4611","sd_4648","sd_76","se_106","se_1060","se_1119","se_1211","se_1237","se_2072","se_2412","se_2714","se_2715","se_2997","se_3117","se_408","se_735","se_983","sg_1344","sg_350","sg_4034","si_1080","sk_555","sn_2068","so_1922","so_3002","so_391","sv_3931","sv_946","sy_165","sy_212","sy_2125","sy_2297","sy_2300","sy_2302","sy_233","sy_2847","sy_4148","sy_4620","sy_4621","sy_509","sy_96","tg_2646","th_376","tn_1502","tn_1794","tn_1813","tn_1820","tn_1826","tn_1853","tn_1854","tn_1907","tn_1966","tn_1969","tn_2139","tn_2193","tn_2692","tn_2755","tn_2760","tn_2946","tn_3038","tn_3042","tn_3049","tn_3058","tn_3059","tn_3180","tn_3555","tn_4489","tn_4544","tn_4577","tn_573","tn_583","tn_879","tn_883","tr_102","tr_1029","tr_104","tr_113","tr_1177","tr_1207","tr_1269","tr_1271","tr_130","tr_1309","tr_1391","tr_1421","tr_1497","tr_1507","tr_151","tr_1516","tr_1524","tr_1564","tr_1577","tr_1596","tr_1635","tr_1671","tr_1689","tr_1708","tr_1743","tr_1762","tr_1895","tr_194","tr_2029","tr_2053","tr_215","tr_2174","tr_2188","tr_2250","tr_228","tr_241","tr_2427","tr_2440","tr_2543","tr_2556","tr_2665","tr_2744","tr_2763","tr_2765","tr_2970","tr_310","tr_3128","tr_315","tr_3421","tr_3526","tr_355","tr_356","tr_3629","tr_3733","tr_3767","tr_3825","tr_392","tr_4140","tr_4272","tr_4287","tr_444","tr_473","tr_4731","tr_4825","tr_501","tr_533","tr_542","tr_543","tr_549","tr_589","tr_613","tr_681","tr_697","tr_742","tr_747","tr_770","tr_78","tr_816","tr_818","tr_841","tr_898","tr_91","tr_911","tr_922","tr_934","tr_980","tr_996","tt_2075","tw_758","tz_1159","tz_2867","tz_288","tz_2903","tz_3391","tz_3694","tz_4526","ua_1292","ua_2528","ua_3091","ua_3529","ua_4097","ua_4234","ua_4293","ug_1254","ug_1256","ug_1943","ug_2539","ug_2549","ug_3039","ug_3267","ug_3519","ug_4263","ug_443","us_1012","us_1027","us_1044","us_1067","us_1073","us_1074","us_1078","us_1079","us_1091","us_1133","us_1143","us_1184","us_1240","us_1335","us_1479","us_1584","us_1616","us_1692","us_1774","us_1829","us_1901","us_193","us_2095","us_2178","us_2231","us_2261","us_235","us_2383","us_2423","us_2453","us_272","us_2912","us_300","us_3071","us_3133","us_3139","us_3144","us_3262","us_3329","us_3460","us_3462","us_3485","us_3567","us_3681","us_3749","us_3762","us_3769","us_3888","us_3905","us_4028","us_4132","us_4152","us_4238","us_427","us_4418","us_4573","us_4574","us_468","us_4806","us_4810","us_4904","us_636","us_662","us_669","us_689","us_804","us_923","us_955","uy_3430","uy_4010","uy_65","uy_832","ve_2506","ve_3137","ve_3337","ve_3338","ve_4459","vn_1808","vn_1981","vn_4891","xk_1439","ye_2897","ye_2906","ye_2907","ye_2951","ye_2968","ye_3080","ye_3263","ye_3287","ye_3881","ye_3944","ye_3966","ye_4019","ye_4134","ye_4189","ye_4868","ye_4883","ye_534","za_1050","za_1686","za_1768","za_2018","za_2031","za_2106","za_2413","za_290","za_2994","za_3013","za_3135","za_3166","za_3299","za_341","za_3431","za_3675","za_3708","za_4133","za_4179","za_4214","za_424","za_453","za_673","za_734","za_888"))
data$hosp_type= factor(data$hosp_type,levels=c("1","2","3"))
data$hosp_fund =factor(data$hosp_fund,levels=c("1","2","3"))
data$hosp_itu_yn = factor(data$hosp_itu_yn,levels=c("1","0"))
data$hosp_hpb = factor(data$hosp_hpb,levels=c("1","0"))
data$hosp_hpb_oncall = factor(data$hosp_hpb_oncall,levels=c("1","2","3","4"))
data$hosp_hpb_path = factor(data$hosp_hpb_path,levels=c("1","0"))
data$hosp_hpb_region = factor(data$hosp_hpb_region,levels=c("1","2","3","4"))
data$hosp_mis_yn =factor(data$hosp_mis_yn,levels=c("1","0"))
data$hosp_mis_image = factor(data$hosp_mis_image,levels=c("1","2","3","4"))
data$service_eme_theatre = factor(data$service_eme_theatre,levels=c("1","2","3","4","5"))
data$service_fu = factor(data$service_fu,levels=c("1","2","3"))
data$diag_us_yn = factor(data$diag_us_yn,levels=c("1","2","3"))
data$diag_ct_yn = factor(data$diag_ct_yn,levels=c("1","2","3"))
data$diag_mrcp_yn = factor(data$diag_mrcp_yn,levels=c("1","2","3"))
data$diag_eus_yn =factor(data$diag_eus_yn,levels=c("1","2","3"))
data$diag_hida_yn = factor(data$diag_hida_yn,levels=c("1","2","3"))
data$diag_ostomy_yn = factor(data$diag_ostomy_yn,levels=c("1","0"))
data$diag_ostomy_oncall = factor(data$diag_ostomy_oncall,levels=c("1","2","3","4","5"))
data$diag_ostomy_region = factor(data$diag_ostomy_region,levels=c("1","2","3","4"))
data$diag_ercp = factor(data$diag_ercp,levels=c("1","2","3","4","5"))
data$diag_ioc = factor(data$diag_ioc,levels=c("1","2","3","4"))
data$diag_lu = factor(data$diag_lu,levels=c("1","2","3","4"))
data$diag_icg = factor(data$diag_icg,levels=c("1","2","3","4"))
data$diag_hist = factor(data$diag_hist,levels=c("1","2","3","4"))
data$train_perform = factor(data$train_perform,levels=c("1","0"))
data$green_lap = factor(data$green_lap,levels=c("1","2","3","4"))
data$green_surginst = factor(data$green_surginst,levels=c("1","2","3","4"))
data$green_drape = factor(data$green_drape,levels=c("1","2","3","4"))
data$green_gown = factor(data$green_gown,levels=c("1","2","3","4"))
data$green_scrubcap = factor(data$green_scrubcap,levels=c("1","2","3","4"))
data$green_recycle = factor(data$green_recycle,levels=c("1","2","3","4"))
data$green_recycle_waste = factor(data$green_recycle_waste,levels=c("1","0"))
data$green_ga = factor(data$green_ga,levels=c("1","2","3","4"))
data$site_survey_complete = factor(data$site_survey_complete,levels=c("0","1","2"))
#data$admin_complete = factor(data$admin_complete,levels=c("0","1","2"))
# Setting foactors for checkbox variables
data$hosp_mis_type___1 = factor(data$hosp_mis_type___1,levels=c("0","1"))
data$hosp_mis_type___2 = factor(data$hosp_mis_type___2,levels=c("0","1"))
data$service_cons_type___1 = factor(data$service_cons_type___1,levels=c("0","1"))
data$service_cons_type___2 = factor(data$service_cons_type___2,levels=c("0","1"))
data$service_cons_type___3 = factor(data$service_cons_type___3,levels=c("0","1"))
data$service_cons_type___4 = factor(data$service_cons_type___4,levels=c("0","1"))
data$service_cons_type___5 = factor(data$service_cons_type___5,levels=c("0","1"))
data$service_cons_type___6 = factor(data$service_cons_type___6,levels=c("0","1"))
data$service_type___1 = factor(data$service_type___1,levels=c("0","1"))
data$service_type___2 = factor(data$service_type___2,levels=c("0","1"))
data$service_setting___1 = factor(data$service_setting___1,levels=c("0","1"))
data$service_setting___2 = factor(data$service_setting___2,levels=c("0","1"))
data$service_setting___3 = factor(data$service_setting___3,levels=c("0","1"))
data$train_grade___1 = factor(data$train_grade___1,levels=c("0","1"))
data$train_grade___2 = factor(data$train_grade___2,levels=c("0","1"))
data$train_grade___3 = factor(data$train_grade___3,levels=c("0","1"))
data$train_grade___4 = factor(data$train_grade___4,levels=c("0","1"))
data$train_sim_yn___1 = factor(data$train_sim_yn___1,levels=c("0","1"))
data$train_sim_yn___2 = factor(data$train_sim_yn___2,levels=c("0","1"))
data$train_sim_yn___3 = factor(data$train_sim_yn___3,levels=c("0","1"))
data$train_sim_yn___4 = factor(data$train_sim_yn___4,levels=c("0","1"))
data$train_sim_type___1 = factor(data$train_sim_type___1,levels=c("0","1"))
data$train_sim_type___2 = factor(data$train_sim_type___2,levels=c("0","1"))
data$train_sim_type___3 = factor(data$train_sim_type___3,levels=c("0","1"))
data$tain_chole___1 = factor(data$tain_chole___1,levels=c("0","1"))
data$tain_chole___2 = factor(data$tain_chole___2,levels=c("0","1"))
data$tain_chole___3 = factor(data$tain_chole___3,levels=c("0","1"))
data$tain_chole___4 = factor(data$tain_chole___4,levels=c("0","1"))
data$train_bdi___1 = factor(data$train_bdi___1,levels=c("0","1"))
data$train_bdi___2 = factor(data$train_bdi___2,levels=c("0","1"))
data$train_bdi___3 = factor(data$train_bdi___3,levels=c("0","1"))
data$train_bdi___4 = factor(data$train_bdi___4,levels=c("0","1"))
#levels(data$redcap_data_access_group)=c("ae_1385","ae_1395","ae_1473","ae_1888","ae_2357","ae_2910","ae_3146","ae_3271","ae_3464","ae_3695","ae_3728","ae_3951","ae_4734","af_1598","af_3286","al_141","al_1480","al_1791","al_2148","al_361","ar_1680","ar_1755","ar_1872","ar_1955","ar_1974","ar_2137","ar_2161","ar_2307","ar_2442","ar_2462","ar_2583","ar_2730","ar_2773","ar_2802","ar_301","ar_3181","ar_3572","ar_3851","ar_3884","ar_4302","ar_4419","ar_4733","ar_480","ar_4902","ar_625","ar_838","ar_860","at_1748","at_2305","at_2403","at_3187","at_3241","at_4458","au_1025","au_1026","au_1030","au_1031","au_1048","au_1059","au_1140","au_1141","au_1145","au_1148","au_1153","au_1157","au_1203","au_1250","au_13","au_1311","au_1312","au_1343","au_1425","au_1493","au_15","au_1551","au_1552","au_1572","au_159","au_160","au_1637","au_166","au_1670","au_17","au_1712","au_1713","au_1714","au_1739","au_1751","au_1752","au_1753","au_1799","au_1859","au_20","au_2156","au_218","au_2252","au_2253","au_250","au_2538","au_26","au_2734","au_274","au_2745","au_2884","au_3293","au_3360","au_4239","au_4399","au_4410","au_454","au_56","au_58","au_623","au_651","au_665","au_670","au_671","au_678","au_679","au_704","au_732","au_74","au_762","au_79","au_856","au_857","au_870","aw_2015","aw_352","az_1238","az_1244","az_1260","az_1261","az_1262","az_1264","az_1265","az_1354","az_1771","az_3330","az_529","az_819","ba_1275","ba_1276","ba_1277","ba_1499","ba_246","ba_3082","ba_338","bd_1688","bd_186","bd_2226","bd_2637","bd_3983","bd_4024","bd_680","be_1099","be_1821","be_1900","be_336","be_703","bf_641","bg_2144","bg_2150","bg_227","bg_2416","bg_3061","bg_3220","bg_325","bg_339","bg_3536","bg_494","bg_609","bg_622","bg_731","bg_913","bh_2039","bh_404","bi_1161","bi_2138","bi_244","bj_1359","bj_1396","bj_1863","bj_2105","bj_2362","bj_2363","bj_2365","bj_2366","bj_2367","bj_2368","bj_2370","bj_2371","bj_2410","bj_3543","bj_3773","bo_1223","bo_650","br_1371","br_1407","br_1442","br_1777","br_1973","br_1984","br_2073","br_2240","br_2448","br_2457","br_2619","br_2634","br_2635","br_2639","br_2704","br_3046","br_3085","br_3645","br_3718","br_406","br_537","br_538","br_85","bt_112","bw_724","by_1289","by_3764","ca_1049","ca_1082","ca_1630","ca_1904","ca_1976","ca_2555","ca_2732","ca_2736","ca_397","ca_405","ca_812","cd_3011","ch_1081","ch_1270","ch_1404","ch_2229","ch_2271","ch_2283","ch_2500","ch_2606","ch_293","ch_3280","ch_3442","ch_363","ch_388","ch_4398","ch_485","ch_492","ch_717","ch_761","cl_1087","cl_1197","cl_2411","cl_2898","cl_4466","cm_1255","cm_1459","cm_2026","cm_2551","cm_3775","cm_677","cn_1916","cn_22","cn_23","cn_2716","cn_3292","cn_365","cn_3692","co_1020","co_129","co_1296","co_1297","co_1546","co_1638","co_2166","co_2217","co_2656","co_3093","co_3282","co_3428","co_3438","co_3439","co_3676","co_3685","co_3906","co_399","co_3999","co_4051","co_4337","co_4434","co_4469","co_682","co_751","co_752","co_892","cy_2516","cy_31","cy_3581","cy_3696","cy_536","cz_1950","cz_2185","cz_2467","cz_2616","cz_2713","cz_3119","cz_3172","cz_836","cz_896","de_1052","de_1118","de_1426","de_1449","de_1648","de_1702","de_1759","de_191","de_196","de_2080","de_2085","de_221","de_2353","de_2437","de_2743","de_2972","de_3106","de_3108","de_3177","de_3206","de_4124","de_4213","de_426","de_4758","de_491","de_694","de_849","dk_3993","dk_4357","dk_508","do_1021","do_572","dz_1100","dz_1428","dz_146","dz_1565","dz_2576","dz_3147","dz_4483","dz_4487","dz_4554","dz_4751","ec_1131","ec_1366","ec_1641","ec_1938","ec_2263","ec_2578","ec_2673","ec_2956","ec_3095","ec_4147","ec_4220","ec_4295","ec_852","ec_929","ee_4385","eg_1005","eg_1037","eg_1047","eg_1083","eg_1096","eg_1123","eg_116","eg_1169","eg_118","eg_1236","eg_1582","eg_162","eg_1695","eg_1822","eg_2122","eg_224","eg_2242","eg_236","eg_2428","eg_2461","eg_2468","eg_2476","eg_2491","eg_2558","eg_265","eg_2833","eg_2857","eg_2859","eg_2949","eg_2957","eg_3152","eg_3309","eg_35","eg_3561","eg_3766","eg_377","eg_4066","eg_4067","eg_4074","eg_412","eg_423","eg_456","eg_46","eg_4698","eg_4882","eg_517","eg_525","eg_567","eg_602","eg_646","eg_655","eg_657","eg_663","eg_664","eg_690","eg_696","eg_786","eg_87","eg_935","es_1105","es_1242","es_1400","es_1483","es_158","es_1593","es_1615","es_1629","es_1693","es_1763","es_1796","es_1977","es_1993","es_201","es_2019","es_2092","es_210","es_2102","es_213","es_2147","es_2153","es_2173","es_2176","es_2194","es_2216","es_2272","es_2324","es_24","es_2602","es_2618","es_2625","es_263","es_27","es_2729","es_279","es_2871","es_2930","es_2931","es_3021","es_3219","es_3541","es_3545","es_3714","es_3748","es_3830","es_3832","es_387","es_3927","es_3964","es_407","es_4084","es_4099","es_4121","es_416","es_4186","es_440","es_4624","es_4761","es_512","es_551","es_599","es_738","es_749","es_757","es_775","es_776","es_80","es_830","es_844","es_894","es_897","es_975","es_977","es_989","et_1000","et_1065","et_114","et_1243","et_1300","et_1304","et_132","et_1363","et_1369","et_1518","et_1699","et_170","et_173","et_295","et_342","et_3450","et_3595","et_3865","et_3866","et_3962","et_4298","et_435","et_588","et_649","et_777","et_899","et_927","et_928","et_997","fi_1455","fi_1862","fi_360","fj_3984","fr_1183","fr_1248","fr_128","fr_1291","fr_1500","fr_1573","fr_1585","fr_1621","fr_1636","fr_1758","fr_2273","fr_2493","fr_2532","fr_2610","fr_2655","fr_2706","fr_3102","fr_3151","fr_3159","fr_3687","fr_4552","fr_4700","fr_907","ga_3279","ga_3682","gb_1016","gb_1024","gb_1034","gb_1038","gb_1098","gb_1112","gb_1121","gb_1172","gb_1173","gb_1213","gb_1217","gb_122","gb_1221","gb_1222","gb_1227","gb_1233","gb_1241","gb_1253","gb_1282","gb_1287","gb_1288","gb_1305","gb_1317","gb_1390","gb_1422","gb_1438","gb_1445","gb_148","gb_1503","gb_1506","gb_1519","gb_1541","gb_1543","gb_1553","gb_1581","gb_1608","gb_1611","gb_1613","gb_1628","gb_1647","gb_1649","gb_1658","gb_1691","gb_1749","gb_1772","gb_180","gb_1823","gb_1844","gb_187","gb_189","gb_1913","gb_1914","gb_1947","gb_1951","gb_1960","gb_1972","gb_2017","gb_204","gb_2055","gb_2059","gb_207","gb_2112","gb_2196","gb_2197","gb_2198","gb_2230","gb_2232","gb_2313","gb_2391","gb_2436","gb_2507","gb_2537","gb_2589","gb_261","gb_2620","gb_2645","gb_2667","gb_278","gb_284","gb_2899","gb_2975","gb_3005","gb_3054","gb_306","gb_3084","gb_3107","gb_3123","gb_314","gb_3149","gb_3235","gb_3259","gb_3300","gb_3308","gb_3312","gb_3316","gb_3321","gb_3326","gb_3327","gb_3366","gb_3457","gb_3463","gb_3505","gb_3642","gb_3702","gb_3704","gb_3724","gb_3727","gb_3739","gb_375","gb_3761","gb_3776","gb_3777","gb_379","gb_3790","gb_3797","gb_3834","gb_3852","gb_3861","gb_3877","gb_3902","gb_3914","gb_3987","gb_3988","gb_4038","gb_4114","gb_4127","gb_4151","gb_420","gb_431","gb_4396","gb_464","gb_465","gb_470","gb_4740","gb_4824","gb_4876","gb_4889","gb_544","gb_554","gb_557","gb_559","gb_597","gb_600","gb_610","gb_637","gb_643","gb_656","gb_715","gb_727","gb_73","gb_739","gb_796","gb_806","gb_843","gb_858","gb_880","gb_893","gb_98","ge_3550","ge_3551","ge_463","gh_1302","gh_2611","gh_3127","gh_3470","gh_3499","gh_3820","gh_4171","gh_4225","gh_4567","gh_4595","gh_785","gh_790","gh_826","gh_845","gm_3546","gr_1010","gr_1028","gr_1039","gr_1053","gr_1072","gr_1075","gr_1086","gr_111","gr_1124","gr_1180","gr_127","gr_1360","gr_1482","gr_152","gr_1554","gr_1602","gr_1655","gr_1694","gr_185","gr_1893","gr_1894","gr_1931","gr_1997","gr_200","gr_2083","gr_2202","gr_2281","gr_2303","gr_2335","gr_245","gr_264","gr_289","gr_303","gr_3086","gr_3089","gr_3478","gr_3627","gr_371","gr_378","gr_3821","gr_3979","gr_40","gr_4029","gr_414","gr_43","gr_482","gr_487","gr_577","gr_582","gr_591","gr_638","gr_640","gr_755","gr_766","gr_823","gr_833","gr_84","gr_854","gr_942","gt_1187","gt_1986","gt_277","gt_4360","gt_4361","gt_4898","gw_943","hk_1239","hk_3837","hk_3838","hn_1773","hn_1784","hn_2593","hn_547","hr_1234","hr_1681","hr_1730","hr_2077","hr_2379","hr_2520","hr_2675","hr_2967","hr_3440","hr_4619","hr_507","hu_1609","hu_1792","hu_2003","hu_2006","hu_2731","hu_3631","id_1199","id_1201","id_1286","id_1319","id_1339","id_1413","id_1481","id_169","id_178","id_1924","id_2544","id_2595","id_861","ie_1163","ie_1226","ie_1281","ie_1646","ie_2111","ie_2290","ie_2550","ie_2552","ie_2591","ie_2623","ie_2723","ie_2984","ie_3178","ie_3332","ie_3398","ie_3538","ie_3735","ie_3736","ie_3737","ie_4712","ie_642","ie_957","il_1328","il_1812","il_2067","il_2513","il_2668","il_3067","il_3339","il_3413","il_481","in_1022","in_1056","in_1062","in_1094","in_1097","in_1146","in_1167","in_1176","in_1224","in_1232","in_1298","in_1333","in_1349","in_1350","in_1388","in_139","in_1432","in_1435","in_1436","in_144","in_149","in_1508","in_1537","in_1587","in_1817","in_183","in_1843","in_1847","in_1870","in_1884","in_1899","in_1919","in_1934","in_1979","in_1996","in_202","in_2109","in_214","in_2143","in_2172","in_2183","in_2209","in_2309","in_2311","in_2348","in_2376","in_2395","in_2396","in_2399","in_2414","in_2418","in_2425","in_2488","in_2499","in_2515","in_2518","in_2527","in_254","in_2570","in_2571","in_2574","in_2696","in_2733","in_2748","in_2823","in_2945","in_317","in_3186","in_321","in_328","in_3336","in_334","in_3371","in_3420","in_3443","in_3474","in_3476","in_3503","in_3504","in_3577","in_390","in_4104","in_4169","in_4174","in_4232","in_4285","in_4344","in_442","in_4437","in_4563","in_4566","in_4599","in_4744","in_4766","in_4793","in_4815","in_4890","in_518","in_521","in_666","in_700","in_709","in_810","in_814","in_828","in_846","in_864","in_902","in_906","in_93","in_95","in_958","in_961","iq_1348","iq_2076","iq_2580","iq_2796","iq_2892","iq_3116","iq_316","iq_3556","iq_3968","iq_4082","iq_4205","iq_4409","iq_446","iq_451","iq_871","ir_1513","ir_2045","ir_4138","ir_4732","ir_585","ir_784","ir_868","ir_900","is_1936","is_2326","is_3157","it_1103","it_1104","it_1152","it_1162","it_1215","it_1246","it_125","it_1308","it_131","it_1316","it_1326","it_1330","it_1331","it_1332","it_1334","it_1338","it_1346","it_1356","it_136","it_1387","it_1399","it_140","it_1403","it_1411","it_1419","it_150","it_1538","it_1548","it_1560","it_1562","it_1571","it_1574","it_1599","it_168","it_1683","it_1701","it_171","it_176","it_1776","it_1793","it_1815","it_1921","it_1935","it_198","it_1980","it_2002","it_2020","it_2038","it_205","it_2069","it_2120","it_217","it_2180","it_219","it_2204","it_2214","it_2218","it_2234","it_229","it_2291","it_231","it_234","it_2342","it_2346","it_2358","it_2400","it_2438","it_2469","it_2470","it_2511","it_2521","it_2567","it_2612","it_2613","it_2621","it_2643","it_2648","it_2663","it_268","it_271","it_2726","it_2758","it_283","it_2864","it_2966","it_299","it_3027","it_3034","it_3036","it_305","it_3140","it_3175","it_3258","it_3365","it_3374","it_340","it_3408","it_3427","it_3432","it_3488","it_3512","it_3514","it_3516","it_3518","it_353","it_3544","it_3571","it_36","it_3667","it_37","it_3700","it_3706","it_38","it_3815","it_3912","it_3928","it_395","it_3985","it_401","it_4013","it_402","it_4088","it_4122","it_4315","it_4330","it_4379","it_438","it_4413","it_4451","it_4583","it_4617","it_4623","it_4627","it_467","it_4719","it_474","it_475","it_4764","it_478","it_4873","it_4894","it_493","it_499","it_519","it_523","it_570","it_580","it_590","it_594","it_612","it_62","it_631","it_633","it_647","it_69","it_692","it_70","it_705","it_708","it_721","it_733","it_743","it_767","it_773","it_781","it_789","it_791","it_798","it_809","it_811","it_827","it_873","it_887","it_889","it_903","it_905","it_909","it_916","it_919","it_92","it_920","it_940","it_949","it_964","it_969","it_988","it_995","jm_3077","jo_115","jo_1341","jo_1910","jo_192","jo_199","jo_2107","jo_2162","jo_2208","jo_2285","jo_2310","jo_2429","jo_2441","jo_2805","jo_29","jo_30","jo_3347","jo_3549","jo_3669","jo_4306","jo_486","jo_553","jo_653","jo_710","jo_918","jp_1093","jp_1381","jp_2190","jp_253","jp_2980","jp_3028","jp_4327","ke_1200","ke_1662","ke_1797","ke_1866","ke_2201","ke_2585","ke_2896","ke_4020","ke_531","ke_540","ke_740","ke_799","ke_815","kh_1754","kr_1092","kr_2982","kw_1452","kw_1786","kw_2624","kw_2630","kw_2633","kw_2647","kw_2711","kw_2721","kz_1437","kz_1566","kz_2660","kz_2661","kz_4040","lb_1283","lb_2279","lb_2934","lb_3035","lb_3378","lb_479","lk_1041","lk_105","lk_251","lk_3230","lk_528","lk_539","lk_675","lk_718","lr_2236","lr_959","lt_1231","lt_247","lt_2725","lt_3479","lt_4343","lt_556","lu_635","lv_1476","lv_3559","lv_3703","lv_730","ly_1061","ly_1128","ly_1251","ly_1358","ly_1515","ly_1520","ly_1623","ly_1685","ly_1757","ly_197","ly_1985","ly_2082","ly_209","ly_2134","ly_2838","ly_2845","ly_2853","ly_2861","ly_3050","ly_3209","ly_3358","ly_3380","ly_3392","ly_347","ly_425","ly_4311","ly_4433","ly_4475","ly_4872","ly_862","ly_931","ma_101","ma_1135","ma_1672","ma_2097","ma_2443","ma_2548","ma_2622","ma_3285","ma_41","ma_4838","ma_619","ma_875","mg_1597","mg_2071","mk_1220","mk_177","mk_3856","mn_3243","mn_484","mo_3260","mt_541","mv_716","mx_1019","mx_1064","mx_1068","mx_1071","mx_1088","mx_1185","mx_1198","mx_1321","mx_1345","mx_1622","mx_1624","mx_1696","mx_1710","mx_1716","mx_1787","mx_1834","mx_1857","mx_1898","mx_1908","mx_2000","mx_2123","mx_2219","mx_2238","mx_2415","mx_2419","mx_2424","mx_2430","mx_2445","mx_2463","mx_2477","mx_2481","mx_2562","mx_2566","mx_2575","mx_2631","mx_2879","mx_2908","mx_2914","mx_2924","mx_3048","mx_3064","mx_3150","mx_3158","mx_3167","mx_3169","mx_3171","mx_3274","mx_3281","mx_330","mx_3313","mx_3334","mx_3359","mx_3456","mx_3565","mx_357","mx_3586","mx_364","mx_3672","mx_3688","mx_422","mx_4471","mx_4530","mx_4531","mx_4594","mx_460","mx_4629","mx_476","mx_520","mx_581","mx_586","mx_595","mx_630","mx_644","mx_667","mx_808","mx_835","mx_933","mx_947","mx_968","my_1066","my_1154","my_1279","my_1285","my_1336","my_1424","my_1463","my_1466","my_1527","my_1665","my_1678","my_1994","my_2086","my_2199","my_2446","my_249","my_2496","my_256","my_286","my_59","my_863","mz_1478","na_3523","na_3525","na_372","na_908","ne_2124","ne_2577","ne_3935","ng_1018","ng_1076","ng_1247","ng_1382","ng_1434","ng_1567","ng_163","ng_1850","ng_188","ng_1957","ng_1995","ng_211","ng_2211","ng_2275","ng_2387","ng_239","ng_2390","ng_2398","ng_2420","ng_2422","ng_2573","ng_258","ng_2654","ng_2686","ng_285","ng_3031","ng_3099","ng_318","ng_3257","ng_329","ng_3297","ng_3298","ng_345","ng_3885","ng_415","ng_434","ng_4369","ng_552","ng_608","ng_674","ng_748","ng_842","ng_97","ni_3238","ni_3495","ni_4576","nl_1058","nl_1867","nl_1890","nl_2195","nl_4120","nl_4841","no_1398","no_1659","no_2149","no_2681","no_2824","no_3168","no_358","no_4401","no_4903","np_1468","np_1905","np_1956","np_3052","nz_108","nz_1353","nz_1783","nz_1881","nz_2154","nz_2916","nz_3404","nz_4057","nz_4059","nz_596","nz_941","nz_944","nz_970","om_2490","om_343","om_4191","om_524","pa_138","pa_2009","pe_1307","pe_1367","pe_157","pe_1607","pe_1612","pe_1750","pe_1828","pe_1830","pe_1836","pe_1852","pe_1871","pe_1917","pe_1918","pe_2175","pe_2482","pe_2909","pe_2941","pe_297","pe_3130","pe_3208","pe_3210","pe_3268","pe_3284","pe_3522","pe_3759","pe_3784","pe_3864","pe_3911","pe_3917","pe_3976","pe_3977","pe_4060","pe_4100","pe_4154","pe_4283","pe_4304","pe_4415","pe_530","pe_683","ph_1195","ph_1202","ph_1230","ph_1318","ph_1570","ph_1639","ph_1729","ph_1809","ph_182","ph_2494","ph_2614","ph_3673","ph_368","ph_3717","ph_3882","ph_3903","ph_3972","ph_4102","ph_418","ph_722","pk_1032","pk_1113","pk_1132","pk_121","pk_1324","pk_137","pk_1379","pk_1389","pk_1406","pk_1409","pk_1453","pk_1460","pk_1467","pk_1470","pk_1477","pk_1533","pk_1557","pk_161","pk_1643","pk_1737","pk_174","pk_1780","pk_1790","pk_1795","pk_1800","pk_1887","pk_1926","pk_1998","pk_2013","pk_2103","pk_222","pk_2248","pk_2257","pk_2464","pk_2684","pk_2710","pk_2929","pk_3041","pk_307","pk_32","pk_3254","pk_3304","pk_3454","pk_3531","pk_3564","pk_3576","pk_3589","pk_3658","pk_381","pk_3836","pk_3842","pk_39","pk_3921","pk_3936","pk_3937","pk_4316","pk_4412","pk_4435","pk_4598","pk_500","pk_63","pk_676","pk_688","pk_753","pk_760","pk_764","pk_787","pk_801","pk_825","pk_866","pk_90","pk_921","pk_924","pl_1035","pl_1084","pl_145","pl_1673","pl_1741","pl_2028","pl_2066","pl_2200","pl_3223","pl_3381","pl_4523","pl_587","ps_1337","ps_156","ps_21","ps_2287","ps_276","ps_2795","ps_291","ps_3124","ps_3142","ps_4159","ps_4173","ps_4248","ps_516","ps_979","pt_1063","pt_1139","pt_1156","pt_1170","pt_1368","pt_1386","pt_1487","pt_1583","pt_1586","pt_1601","pt_1614","pt_1744","pt_1747","pt_1761","pt_1798","pt_1810","pt_1869","pt_1903","pt_1970","pt_1992","pt_2116","pt_2135","pt_2136","pt_2170","pt_2269","pt_2320","pt_2669","pt_3090","pt_3176","pt_3229","pt_394","pt_4216","pt_461","pt_502","pt_505","pt_527","pt_772","pt_805","pt_850","pt_86","py_1375","py_1376","py_1590","py_1940","py_2140","py_2212","py_2406","py_3075","py_382","py_3839","py_925","qa_1258","qa_143","qa_2247","qa_3480","ro_1440","ro_1645","ro_1675","ro_1839","ro_1846","ro_1873","ro_195","ro_2378","ro_242","ro_243","ro_2502","ro_2829","ro_3016","ro_3384","ro_366","ro_421","ro_436","ro_441","ro_45","ro_526","ro_71","ro_839","ro_872","ro_882","rs_2081","rs_2210","rs_2227","rs_2421","rs_2557","rs_3816","rs_4223","rs_477","rs_4839","rs_503","rs_639","rs_759","ru_1667","ru_18","ru_1827","ru_2036","ru_2268","ru_2293","ru_2318","ru_2377","ru_2388","ru_3250","ru_4009","ru_706","ru_765","ru_782","ru_792","rw_1042","rw_1107","rw_1109","rw_1110","rw_1111","rw_1116","rw_1591","rw_1594","rw_1619","rw_561","rw_869","sa_1023","sa_1043","sa_1558","sa_172","sa_181","sa_1855","sa_1912","sa_203","sa_2096","sa_2160","sa_2484","sa_252","sa_273","sa_2793","sa_2819","sa_2993","sa_2996","sa_2999","sa_3012","sa_3026","sa_313","sa_3162","sa_3273","sa_3397","sa_369","sa_3803","sa_3823","sa_3908","sa_4130","sa_437","sa_4371","sa_4569","sa_4605","sa_513","sa_522","sa_723","sa_75","sa_81","sd_1106","sd_1117","sd_1430","sd_1807","sd_2785","sd_2801","sd_2918","sd_3155","sd_3212","sd_3560","sd_3711","sd_3763","sd_3879","sd_4052","sd_4081","sd_4374","sd_4485","sd_4490","sd_4611","sd_4648","sd_76","se_106","se_1060","se_1119","se_1211","se_1237","se_2072","se_2412","se_2714","se_2715","se_2997","se_3117","se_408","se_735","se_983","sg_1344","sg_350","sg_4034","si_1080","sk_555","sn_2068","so_1922","so_3002","so_391","sv_3931","sv_946","sy_165","sy_212","sy_2125","sy_2297","sy_2300","sy_2302","sy_233","sy_2847","sy_4148","sy_4620","sy_4621","sy_509","sy_96","tg_2646","th_376","tn_1502","tn_1794","tn_1813","tn_1820","tn_1826","tn_1853","tn_1854","tn_1907","tn_1966","tn_1969","tn_2139","tn_2193","tn_2692","tn_2755","tn_2760","tn_2946","tn_3038","tn_3042","tn_3049","tn_3058","tn_3059","tn_3180","tn_3555","tn_4489","tn_4544","tn_4577","tn_573","tn_583","tn_879","tn_883","tr_102","tr_1029","tr_104","tr_113","tr_1177","tr_1207","tr_1269","tr_1271","tr_130","tr_1309","tr_1391","tr_1421","tr_1497","tr_1507","tr_151","tr_1516","tr_1524","tr_1564","tr_1577","tr_1596","tr_1635","tr_1671","tr_1689","tr_1708","tr_1743","tr_1762","tr_1895","tr_194","tr_2029","tr_2053","tr_215","tr_2174","tr_2188","tr_2250","tr_228","tr_241","tr_2427","tr_2440","tr_2543","tr_2556","tr_2665","tr_2744","tr_2763","tr_2765","tr_2970","tr_310","tr_3128","tr_315","tr_3421","tr_3526","tr_355","tr_356","tr_3629","tr_3733","tr_3767","tr_3825","tr_392","tr_4140","tr_4272","tr_4287","tr_444","tr_473","tr_4731","tr_4825","tr_501","tr_533","tr_542","tr_543","tr_549","tr_589","tr_613","tr_681","tr_697","tr_742","tr_747","tr_770","tr_78","tr_816","tr_818","tr_841","tr_898","tr_91","tr_911","tr_922","tr_934","tr_980","tr_996","tt_2075","tw_758","tz_1159","tz_2867","tz_288","tz_2903","tz_3391","tz_3694","tz_4526","ua_1292","ua_2528","ua_3091","ua_3529","ua_4097","ua_4234","ua_4293","ug_1254","ug_1256","ug_1943","ug_2539","ug_2549","ug_3039","ug_3267","ug_3519","ug_4263","ug_443","us_1012","us_1027","us_1044","us_1067","us_1073","us_1074","us_1078","us_1079","us_1091","us_1133","us_1143","us_1184","us_1240","us_1335","us_1479","us_1584","us_1616","us_1692","us_1774","us_1829","us_1901","us_193","us_2095","us_2178","us_2231","us_2261","us_235","us_2383","us_2423","us_2453","us_272","us_2912","us_300","us_3071","us_3133","us_3139","us_3144","us_3262","us_3329","us_3460","us_3462","us_3485","us_3567","us_3681","us_3749","us_3762","us_3769","us_3888","us_3905","us_4028","us_4132","us_4152","us_4238","us_427","us_4418","us_4573","us_4574","us_468","us_4806","us_4810","us_4904","us_636","us_662","us_669","us_689","us_804","us_923","us_955","uy_3430","uy_4010","uy_65","uy_832","ve_2506","ve_3137","ve_3337","ve_3338","ve_4459","vn_1808","vn_1981","vn_4891","xk_1439","ye_2897","ye_2906","ye_2907","ye_2951","ye_2968","ye_3080","ye_3263","ye_3287","ye_3881","ye_3944","ye_3966","ye_4019","ye_4134","ye_4189","ye_4868","ye_4883","ye_534","za_1050","za_1686","za_1768","za_2018","za_2031","za_2106","za_2413","za_290","za_2994","za_3013","za_3135","za_3166","za_3299","za_341","za_3431","za_3675","za_3708","za_4133","za_4179","za_4214","za_424","za_453","za_673","za_734","za_888")
levels(data$hosp_type)=c("District (Rural)","District (Non-rural)","Tertiary (teaching or university hospital)")
levels(data$hosp_fund)=c("Public","Private","Mixed")
levels(data$hosp_itu_yn)=c("Yes","No")
levels(data$hosp_hpb)=c("Yes","No")
levels(data$hosp_hpb_oncall)=c("Every day (24 hour)","Every day (daytime 0800 - 1700)","Weekdays only (24 hour)","Weekdays only (daytime 0800 - 1700)")
levels(data$hosp_hpb_path)=c("Yes","No")
levels(data$hosp_hpb_region)=c("Within the same city","In another city but in the same region","In another region","None")
levels(data$hosp_mis_yn)=c("Yes","No")
levels(data$hosp_mis_image)=c("Yes (Photo only)","Yes (Video only)","Yes (Photo and Video)","No")
levels(data$service_eme_theatre)=c("Yes (Everyday)","Yes (Once a week)","Yes (Once every 2 week)","Yes (More than once every 2 weeks)","No")
levels(data$service_fu)=c("Yes (Routinely)","Yes (Selectively)","No")
levels(data$diag_us_yn)=c("Available on-site","Available off-site","Not available")
levels(data$diag_ct_yn)=c("Available on-site","Available off-site","Not available")
levels(data$diag_mrcp_yn)=c("Available on-site","Available off-site","Not available")
levels(data$diag_eus_yn)=c("Available on-site","Available off-site","Not available")
levels(data$diag_hida_yn)=c("Available on-site","Available off-site","Not available")
levels(data$diag_ostomy_yn)=c("Yes","No")
levels(data$diag_ostomy_oncall)=c("Yes (Everyday)","Yes (Once a week)","Yes (Once every 2 week)","Yes (More than once every 2 weeks)","No")
levels(data$diag_ostomy_region)=c("Within the same city","In another city but in the same region","In another region","None")
levels(data$diag_ercp)=c("Yes (Everyday)","Yes (Once a week)","Yes (Once every 2 week)","Yes (More than once every 2 weeks)","No")
levels(data$diag_ioc)=c("Routine use","Selective use with good supply","Selective use with limited supply","Not available")
levels(data$diag_lu)=c("Routine use","Selective use with good supply","Selective use with limited supply","Not available")
levels(data$diag_icg)=c("Routine use","Selective use with good supply","Selective use with limited supply","Not available")
levels(data$diag_hist)=c("Yes (Routinely)","Yes (Selectively)","No (Not sent for histology)","No (No access to histology)")
levels(data$train_perform)=c("Yes","No")
levels(data$green_lap)=c("Yes (Always)","Yes (Sometimes)","No (Not used but available)","No (Not available)")
levels(data$green_surginst)=c("Yes (Always)","Yes (Sometimes)","No (Not used but available)","No (Not available)")
levels(data$green_drape)=c("Yes (Always)","Yes (Sometimes)","No (Not used but available)","No (Not available)")
levels(data$green_gown)=c("Yes (Always)","Yes (Sometimes)","No (Not used but available)","No (Not available)")
levels(data$green_scrubcap)=c("Yes (Always)","Yes (Sometimes)","No (Not used but available)","No (Not available)")
levels(data$green_recycle)=c("Yes (Always)","Yes (Sometimes)","No (Not recycled but recycling service available)","No (No recycling service available)")
levels(data$green_recycle_waste)=c("Yes","No")
levels(data$green_ga)=c("Yes (Always)","Yes (Sometimes)","No (Anaesthetic gases used but IV anaesthesia available)","No (No IV anaesthesia available)")
levels(data$site_survey_complete)=c("Incomplete","Unverified","Complete")
#levels(data$admin_complete)=c("Incomplete","Unverified","Complete")
#Levels for checkbox variables
levels(data$hosp_mis_type___1)=c("Unchecked","Checked")
levels(data$hosp_mis_type___2)=c("Unchecked","Checked")
levels(data$service_cons_type___1)=c("Unchecked","Checked")
levels(data$service_cons_type___2)=c("Unchecked","Checked")
levels(data$service_cons_type___3)=c("Unchecked","Checked")
levels(data$service_cons_type___4)=c("Unchecked","Checked")
levels(data$service_cons_type___5)=c("Unchecked","Checked")
levels(data$service_cons_type___6)=c("Unchecked","Checked")
levels(data$service_type___1)=c("Unchecked","Checked")
levels(data$service_type___2)=c("Unchecked","Checked")
levels(data$service_setting___1)=c("Unchecked","Checked")
levels(data$service_setting___2)=c("Unchecked","Checked")
levels(data$service_setting___3)=c("Unchecked","Checked")
levels(data$train_grade___1)=c("Unchecked","Checked")
levels(data$train_grade___2)=c("Unchecked","Checked")
levels(data$train_grade___3)=c("Unchecked","Checked")
levels(data$train_grade___4)=c("Unchecked","Checked")
levels(data$train_sim_yn___1)=c("Unchecked","Checked")
levels(data$train_sim_yn___2)=c("Unchecked","Checked")
levels(data$train_sim_yn___3)=c("Unchecked","Checked")
levels(data$train_sim_yn___4)=c("Unchecked","Checked")
levels(data$train_sim_type___1)=c("Unchecked","Checked")
levels(data$train_sim_type___2)=c("Unchecked","Checked")
levels(data$train_sim_type___3)=c("Unchecked","Checked")
levels(data$tain_chole___1)=c("Unchecked","Checked")
levels(data$tain_chole___2)=c("Unchecked","Checked")
levels(data$tain_chole___3)=c("Unchecked","Checked")
levels(data$tain_chole___4)=c("Unchecked","Checked")
levels(data$train_bdi___1)=c("Unchecked","Checked")
levels(data$train_bdi___2)=c("Unchecked","Checked")
levels(data$train_bdi___3)=c("Unchecked","Checked")
levels(data$train_bdi___4)=c("Unchecked","Checked")
#Setting Labels
data$record_id %<>% ff_label("Record ID")
data$redcap_data_access_group %<>% ff_label("Data Access Group")
data$hosp_type %<>% ff_label("Hospital type")
data$hosp_fund %<>% ff_label("Hospital funding")
data$hosp_bed %<>% ff_label("Number of inpatient beds")
data$hosp_itu_yn %<>% ff_label("HDU or ITU facilities")
data$hosp_itu_bed %<>% ff_label("Number HDU or ITU beds")
data$hosp_hpb %<>% ff_label("HPB team")
data$hosp_hpb_oncall %<>% ff_label("HPB on-call services")
data$hosp_hpb_path %<>% ff_label("HPB pathway for management of bile duct injury")
data$hosp_hpb_region %<>% ff_label("HPB on-call surgeons")
data$hosp_mis_yn %<>% ff_label("MI surgical equipment available")
#data$hosp_mis_type %<>% ff_label("Type of MI surgical equipment available")
data$hosp_mis_image %<>% ff_label("Routine intraoperative images")
data$service_chole_n %<>% ff_label("number of cholecystectomies per year")
data$service_cons_n %<>% ff_label(" What is the number of consultant/attending surgeons who perform cholecystectomies each year at your hospital?")
data$service_cons_lap_n %<>% ff_label(" What is the number of consultant/attending surgeons who perform laparoscopic cholecystectomy at your hospital?")
#data$service_cons_type %<>% ff_label(" Which specialist consultant/attending surgeons perform cholecystectomies at your hospital?")
#data$service_type %<>% ff_label(" What type of services for cholecystectomy services is provided at your hospital?")
data$service_eme_n %<>% ff_label(" What is the approximate total number of emergency cholecystectomies performed each year at your hospital?")
data$service_eme_theatre %<>% ff_label(" Do you have dedicated theatres for these emergency services?")
#data$service_setting %<>% ff_label(" Where are cholecystectomies performed at your hospital? ")
data$service_fu %<>% ff_label(" Do you follow-up after cholecystectomy?")
data$diag_us_yn %<>% ff_label(" Ultrasound")
data$diag_ct_yn %<>% ff_label(" Computerised Tomography (CT)")
data$diag_mrcp_yn %<>% ff_label(" Magnetic Resonance Cholangiopancreatography (MRCP)")
data$diag_eus_yn %<>% ff_label(" Endoscopic Ultrasound (EUS)")
data$diag_hida_yn %<>% ff_label(" Hepatobiliary Iminodiacetic Acid (HIDA)")
data$diag_ostomy_yn %<>% ff_label(" Does your hospital have access to cholecystostomy for gallbladder drainage?")
data$diag_ostomy_oncall %<>% ff_label(" Are there on-call services for cholecystostomy at your hospital?")
data$diag_ostomy_region %<>% ff_label(" Are there on-call interventional radiologists who perform cholecystostomy available?")
data$diag_ercp %<>% ff_label(" Is there a dedicated Endoscopic retrograde cholangiopancreatography (ERCP) list at your hospital?")
data$diag_ioc %<>% ff_label(" Intraoperative Cholangiogram (IOC)")
data$diag_lu %<>% ff_label(" Laparoscopic Ultrasound")
data$diag_icg %<>% ff_label(" Incisionless fluorescent cholangiography")
data$diag_hist %<>% ff_label(" Do you send gallbladders for histological examination after surgery?")
data$train_perform %<>% ff_label(" Are there trainees in the department who perform gallbladder surgery?")
data$train_n %<>% ff_label(" How many trainees are there in the department who perform gallbladder surgery?")
#data$train_grade %<>% ff_label(" What are the trainees grades who perform gallbladder surgery in your department?")
#data$train_sim_yn %<>% ff_label(" Are there facilities for simulations training for cholecystectomies?")
#data$train_sim_type %<>% ff_label(" What are the types of simulation training available?")
#data$tain_chole %<>% ff_label(" Are there structured educational programmes or coaching for cholecystectomy training?")
#data$train_bdi %<>% ff_label(" Are there specific structured educational programmes or coaching for bile duct injury training?")
data$green_lap %<>% ff_label(" Are reusable laparoscopic ports used?")
data$green_surginst %<>% ff_label(" Are reusable surgical instruments used?")
data$green_drape %<>% ff_label(" Are reusable drapes used?")
data$green_gown %<>% ff_label(" Are reusable gowns used?")
data$green_scrubcap %<>% ff_label(" Are reusable scrub caps used?")
data$green_recycle %<>% ff_label(" Are single-use instruments recycled?")
data$green_recycle_waste %<>% ff_label(" Are clean paper and plastic waste recycled?")
data$green_ga %<>% ff_label(" Is general anaesthesia given through IV rather than anaesthetic gases for environmental reasons?")
data$site_survey_complete %<>% ff_label("Complete?")
data$data_collection_dag %<>% ff_label("Data dag:")
#data$admin_complete %<>% ff_label("Complete?")
# Checkbox labels
data$hosp_mis_type___1 %<>% ff_label("Laparoscopic")
data$hosp_mis_type___2 %<>% ff_label("Robotic")
data$service_cons_type___1 %<>% ff_label("General")
data$service_cons_type___2 %<>% ff_label("Upper GI")
data$service_cons_type___3 %<>% ff_label("HPB")
data$service_cons_type___4 %<>% ff_label("Colorectal")
data$service_cons_type___5 %<>% ff_label("Breast")
data$service_cons_type___6 %<>% ff_label("Other")
data$service_type___1 %<>% ff_label("Elective")
data$service_type___2 %<>% ff_label("Emergency")
data$service_setting___1 %<>% ff_label("Day unit")
data$service_setting___2 %<>% ff_label("Elective theatre")
data$service_setting___3 %<>% ff_label("Emergency theatre")
data$train_grade___1 %<>% ff_label("Post-training fellow")
data$train_grade___2 %<>% ff_label("Senior trainee")
data$train_grade___3 %<>% ff_label("Junior trainee")
data$train_grade___4 %<>% ff_label("Non-trainees or doctors")
data$train_sim_yn___1 %<>% ff_label("Yes (Local hospital)")
data$train_sim_yn___2 %<>% ff_label("Yes (Regional)")
data$train_sim_yn___3 %<>% ff_label("Yes (National)")
data$train_sim_yn___4 %<>% ff_label("No")
data$train_sim_type___1 %<>% ff_label("Box trainer")
data$train_sim_type___2 %<>% ff_label("IT simulation model")
data$train_sim_type___3 %<>% ff_label(" Animal model")
data$tain_chole___1 %<>% ff_label("Yes (Local hospital)")
data$tain_chole___2 %<>% ff_label("Yes (Regional)")
data$tain_chole___3 %<>% ff_label("Yes (National)")
data$tain_chole___4 %<>% ff_label(" No")
data$train_bdi___1 %<>% ff_label("Yes (Local hospital)")
data$train_bdi___2 %<>% ff_label("Yes (Regional)")
data$train_bdi___3 %<>% ff_label("Yes (National)")
data$train_bdi___4 %<>% ff_label("No")
#hosp_mis_type___1
#hosp_mis_type___2
#service_cons_type___1
#service_cons_type___2
#service_cons_type___3
#service_cons_type___4
#service_cons_type___5
#service_cons_type___6
#service_type___1
#service_type___2
#service_setting___1
#service_setting___2
#service_setting___3
#train_grade___1
#train_grade___2
#train_grade___3
#train_grade___4
#train_sim_yn___1
#train_sim_yn___2
#train_sim_yn___3
#train_sim_yn___4
#train_sim_type___1
#train_sim_type___2
#train_sim_type___3
#tain_chole___1
#tain_chole___2
#tain_chole___3
#tain_chole___4
#train_bdi___1
#train_bdi___2
#train_bdi___3
#train_bdi___4