R/recode_from_ISCO88_to_ISEI.R

In SocialPosition: Social Position Indicators Construction Toolbox

recode_from_ISCO88_to_ISEI<-function(ISCO88, data)
{
data$ISEI[ISCO88%in%1]<-55
data$ISEI[ISCO88%in%10]<-55
data$ISEI[ISCO88%in%100]<-55
data$ISEI[ISCO88%in%1000]<-55
data$ISEI[ISCO88%in%11]<-70
data$ISEI[ISCO88%in%110]<-70
data$ISEI[ISCO88%in%1100]<-70
data$ISEI[ISCO88%in%111]<-77
data$ISEI[ISCO88%in%1110]<-77
data$ISEI[ISCO88%in%112]<-77
data$ISEI[ISCO88%in%1120]<-77
data$ISEI[ISCO88%in%113]<-66
data$ISEI[ISCO88%in%1130]<-66
data$ISEI[ISCO88%in%114]<-58
data$ISEI[ISCO88%in%1140]<-58
data$ISEI[ISCO88%in%1141]<-58
data$ISEI[ISCO88%in%1142]<-58
data$ISEI[ISCO88%in%1143]<-58
data$ISEI[ISCO88%in%12]<-68
data$ISEI[ISCO88%in%120]<-68
data$ISEI[ISCO88%in%1200]<-68
data$ISEI[ISCO88%in%121]<-70
data$ISEI[ISCO88%in%1210]<-70
data$ISEI[ISCO88%in%1212]<-70
data$ISEI[ISCO88%in%1213]<-70
data$ISEI[ISCO88%in%1214]<-70
data$ISEI[ISCO88%in%1215]<-70
data$ISEI[ISCO88%in%1216]<-70
data$ISEI[ISCO88%in%1217]<-70
data$ISEI[ISCO88%in%1218]<-70
data$ISEI[ISCO88%in%1219]<-70
data$ISEI[ISCO88%in%1210]<-70
data$ISEI[ISCO88%in%122]<-67
data$ISEI[ISCO88%in%1220]<-67
data$ISEI[ISCO88%in%1221]<-67
data$ISEI[ISCO88%in%1222]<-67
data$ISEI[ISCO88%in%1223]<-67
data$ISEI[ISCO88%in%1224]<-59
data$ISEI[ISCO88%in%1225]<-59
data$ISEI[ISCO88%in%1226]<-59
data$ISEI[ISCO88%in%1227]<-87
data$ISEI[ISCO88%in%1228]<-59
data$ISEI[ISCO88%in%1229]<-67
data$ISEI[ISCO88%in%123]<-61
data$ISEI[ISCO88%in%1230]<-61
data$ISEI[ISCO88%in%1231]<-69
data$ISEI[ISCO88%in%1232]<-69
data$ISEI[ISCO88%in%1233]<-56
data$ISEI[ISCO88%in%1234]<-69
data$ISEI[ISCO88%in%1235]<-69
data$ISEI[ISCO88%in%1236]<-69
data$ISEI[ISCO88%in%1237]<-69
data$ISEI[ISCO88%in%1239]<-69
data$ISEI[ISCO88%in%124]<-58
data$ISEI[ISCO88%in%1240]<-58
data$ISEI[ISCO88%in%125]<-64
data$ISEI[ISCO88%in%1250]<-64
data$ISEI[ISCO88%in%1251]<-70
data$ISEI[ISCO88%in%1252]<-60
data$ISEI[ISCO88%in%13]<-51
data$ISEI[ISCO88%in%130]<-51
data$ISEI[ISCO88%in%1300]<-51
data$ISEI[ISCO88%in%131]<-51
data$ISEI[ISCO88%in%1310]<-51
data$ISEI[ISCO88%in%1311]<-43
data$ISEI[ISCO88%in%1312]<-56
data$ISEI[ISCO88%in%1313]<-51
data$ISEI[ISCO88%in%1314]<-49
data$ISEI[ISCO88%in%1315]<-44
data$ISEI[ISCO88%in%1316]<-51
data$ISEI[ISCO88%in%1317]<-51
data$ISEI[ISCO88%in%1318]<-51
data$ISEI[ISCO88%in%1319]<-51
data$ISEI[ISCO88%in%2]<-70
data$ISEI[ISCO88%in%20]<-70
data$ISEI[ISCO88%in%200]<-70
data$ISEI[ISCO88%in%2000]<-70
data$ISEI[ISCO88%in%21]<-69
data$ISEI[ISCO88%in%210]<-69
data$ISEI[ISCO88%in%2100]<-69
data$ISEI[ISCO88%in%211]<-74
data$ISEI[ISCO88%in%2110]<-74
data$ISEI[ISCO88%in%2111]<-74
data$ISEI[ISCO88%in%2112]<-74
data$ISEI[ISCO88%in%2113]<-74
data$ISEI[ISCO88%in%2114]<-74
data$ISEI[ISCO88%in%212]<-71
data$ISEI[ISCO88%in%2120]<-71
data$ISEI[ISCO88%in%2121]<-71
data$ISEI[ISCO88%in%2122]<-71
data$ISEI[ISCO88%in%213]<-71
data$ISEI[ISCO88%in%2130]<-71
data$ISEI[ISCO88%in%2131]<-71
data$ISEI[ISCO88%in%2132]<-71
data$ISEI[ISCO88%in%2139]<-71
data$ISEI[ISCO88%in%214]<-73
data$ISEI[ISCO88%in%2140]<-73
data$ISEI[ISCO88%in%2141]<-69
data$ISEI[ISCO88%in%2142]<-69
data$ISEI[ISCO88%in%2143]<-68
data$ISEI[ISCO88%in%2144]<-68
data$ISEI[ISCO88%in%2145]<-67
data$ISEI[ISCO88%in%2146]<-71
data$ISEI[ISCO88%in%2147]<-67
data$ISEI[ISCO88%in%2148]<-56
data$ISEI[ISCO88%in%2149]<-69
data$ISEI[ISCO88%in%22]<-80
data$ISEI[ISCO88%in%220]<-80
data$ISEI[ISCO88%in%2200]<-80
data$ISEI[ISCO88%in%221]<-78
data$ISEI[ISCO88%in%2210]<-78
data$ISEI[ISCO88%in%2211]<-77
data$ISEI[ISCO88%in%2212]<-77
data$ISEI[ISCO88%in%2213]<-79
data$ISEI[ISCO88%in%222]<-85
data$ISEI[ISCO88%in%2220]<-85
data$ISEI[ISCO88%in%2221]<-88
data$ISEI[ISCO88%in%2222]<-85
data$ISEI[ISCO88%in%2223]<-83
data$ISEI[ISCO88%in%2224]<-74
data$ISEI[ISCO88%in%2229]<-85
data$ISEI[ISCO88%in%223]<-43
data$ISEI[ISCO88%in%2230]<-43
data$ISEI[ISCO88%in%23]<-69
data$ISEI[ISCO88%in%230]<-69
data$ISEI[ISCO88%in%2300]<-69
data$ISEI[ISCO88%in%231]<-77
data$ISEI[ISCO88%in%2310]<-77
data$ISEI[ISCO88%in%232]<-69
data$ISEI[ISCO88%in%2320]<-69
data$ISEI[ISCO88%in%2321]<-70
data$ISEI[ISCO88%in%2322]<-66
data$ISEI[ISCO88%in%233]<-66
data$ISEI[ISCO88%in%2330]<-66
data$ISEI[ISCO88%in%2331]<-66
data$ISEI[ISCO88%in%2332]<-43
data$ISEI[ISCO88%in%234]<-66
data$ISEI[ISCO88%in%2340]<-66
data$ISEI[ISCO88%in%235]<-66
data$ISEI[ISCO88%in%2350]<-66
data$ISEI[ISCO88%in%2351]<-70
data$ISEI[ISCO88%in%2352]<-70
data$ISEI[ISCO88%in%2359]<-65
data$ISEI[ISCO88%in%24]<-68
data$ISEI[ISCO88%in%240]<-68
data$ISEI[ISCO88%in%2400]<-68
data$ISEI[ISCO88%in%241]<-69
data$ISEI[ISCO88%in%2410]<-69
data$ISEI[ISCO88%in%2411]<-69
data$ISEI[ISCO88%in%2412]<-69
data$ISEI[ISCO88%in%2419]<-69
data$ISEI[ISCO88%in%242]<-85
data$ISEI[ISCO88%in%2420]<-85
data$ISEI[ISCO88%in%2421]<-85
data$ISEI[ISCO88%in%2422]<-90
data$ISEI[ISCO88%in%2429]<-82
data$ISEI[ISCO88%in%243]<-65
data$ISEI[ISCO88%in%2430]<-65
data$ISEI[ISCO88%in%2431]<-65
data$ISEI[ISCO88%in%2432]<-65
data$ISEI[ISCO88%in%244]<-65
data$ISEI[ISCO88%in%2440]<-65
data$ISEI[ISCO88%in%2441]<-78
data$ISEI[ISCO88%in%2442]<-71
data$ISEI[ISCO88%in%2443]<-71
data$ISEI[ISCO88%in%2444]<-65
data$ISEI[ISCO88%in%2445]<-71
data$ISEI[ISCO88%in%2446]<-51
data$ISEI[ISCO88%in%245]<-61
data$ISEI[ISCO88%in%2450]<-61
data$ISEI[ISCO88%in%2451]<-65
data$ISEI[ISCO88%in%2452]<-54
data$ISEI[ISCO88%in%2453]<-64
data$ISEI[ISCO88%in%2454]<-64
data$ISEI[ISCO88%in%2455]<-64
data$ISEI[ISCO88%in%246]<-53
data$ISEI[ISCO88%in%2460]<-53
data$ISEI[ISCO88%in%247]<-NA
data$ISEI[ISCO88%in%2470]<-NA
data$ISEI[ISCO88%in%3]<-54
data$ISEI[ISCO88%in%30]<-54
data$ISEI[ISCO88%in%300]<-54
data$ISEI[ISCO88%in%3000]<-54
data$ISEI[ISCO88%in%31]<-50
data$ISEI[ISCO88%in%310]<-50
data$ISEI[ISCO88%in%3100]<-50
data$ISEI[ISCO88%in%311]<-49
data$ISEI[ISCO88%in%3110]<-49
data$ISEI[ISCO88%in%3111]<-45
data$ISEI[ISCO88%in%3112]<-45
data$ISEI[ISCO88%in%3113]<-46
data$ISEI[ISCO88%in%3114]<-46
data$ISEI[ISCO88%in%3115]<-54
data$ISEI[ISCO88%in%3116]<-54
data$ISEI[ISCO88%in%3117]<-54
data$ISEI[ISCO88%in%3118]<-51
data$ISEI[ISCO88%in%3119]<-53
data$ISEI[ISCO88%in%312]<-52
data$ISEI[ISCO88%in%3120]<-52
data$ISEI[ISCO88%in%3121]<-52
data$ISEI[ISCO88%in%3122]<-52
data$ISEI[ISCO88%in%3123]<-52
data$ISEI[ISCO88%in%313]<-52
data$ISEI[ISCO88%in%3130]<-52
data$ISEI[ISCO88%in%3131]<-48
data$ISEI[ISCO88%in%3132]<-57
data$ISEI[ISCO88%in%3133]<-57
data$ISEI[ISCO88%in%3139]<-52
data$ISEI[ISCO88%in%314]<-57
data$ISEI[ISCO88%in%3140]<-57
data$ISEI[ISCO88%in%3141]<-52
data$ISEI[ISCO88%in%3142]<-52
data$ISEI[ISCO88%in%3143]<-69
data$ISEI[ISCO88%in%3144]<-69
data$ISEI[ISCO88%in%3145]<-50
data$ISEI[ISCO88%in%315]<-50
data$ISEI[ISCO88%in%3150]<-50
data$ISEI[ISCO88%in%3151]<-50
data$ISEI[ISCO88%in%3152]<-50
data$ISEI[ISCO88%in%32]<-48
data$ISEI[ISCO88%in%320]<-48
data$ISEI[ISCO88%in%3200]<-48
data$ISEI[ISCO88%in%321]<-50
data$ISEI[ISCO88%in%3210]<-50
data$ISEI[ISCO88%in%3211]<-50
data$ISEI[ISCO88%in%3212]<-50
data$ISEI[ISCO88%in%3213]<-50
data$ISEI[ISCO88%in%322]<-55
data$ISEI[ISCO88%in%3220]<-55
data$ISEI[ISCO88%in%3221]<-51
data$ISEI[ISCO88%in%3222]<-51
data$ISEI[ISCO88%in%3223]<-51
data$ISEI[ISCO88%in%3224]<-60
data$ISEI[ISCO88%in%3225]<-51
data$ISEI[ISCO88%in%3226]<-60
data$ISEI[ISCO88%in%3227]<-51
data$ISEI[ISCO88%in%3228]<-51
data$ISEI[ISCO88%in%3229]<-51
data$ISEI[ISCO88%in%323]<-38
data$ISEI[ISCO88%in%3230]<-38
data$ISEI[ISCO88%in%3231]<-38
data$ISEI[ISCO88%in%3232]<-38
data$ISEI[ISCO88%in%3240]<-49
data$ISEI[ISCO88%in%3241]<-51
data$ISEI[ISCO88%in%3242]<-38
data$ISEI[ISCO88%in%33]<-38
data$ISEI[ISCO88%in%330]<-38
data$ISEI[ISCO88%in%3300]<-38
data$ISEI[ISCO88%in%331]<-38
data$ISEI[ISCO88%in%3310]<-38
data$ISEI[ISCO88%in%332]<-38
data$ISEI[ISCO88%in%3320]<-38
data$ISEI[ISCO88%in%333]<-38
data$ISEI[ISCO88%in%3330]<-38
data$ISEI[ISCO88%in%334]<-38
data$ISEI[ISCO88%in%3340]<-38
data$ISEI[ISCO88%in%34]<-55
data$ISEI[ISCO88%in%340]<-55
data$ISEI[ISCO88%in%3400]<-55
data$ISEI[ISCO88%in%341]<-55
data$ISEI[ISCO88%in%3410]<-55
data$ISEI[ISCO88%in%3411]<-61
data$ISEI[ISCO88%in%3412]<-54
data$ISEI[ISCO88%in%3413]<-59
data$ISEI[ISCO88%in%3414]<-56
data$ISEI[ISCO88%in%3415]<-56
data$ISEI[ISCO88%in%3416]<-50
data$ISEI[ISCO88%in%3417]<-56
data$ISEI[ISCO88%in%3419]<-55
data$ISEI[ISCO88%in%342]<-55
data$ISEI[ISCO88%in%3420]<-55
data$ISEI[ISCO88%in%3421]<-55
data$ISEI[ISCO88%in%3422]<-55
data$ISEI[ISCO88%in%3423]<-55
data$ISEI[ISCO88%in%3429]<-55
data$ISEI[ISCO88%in%343]<-54
data$ISEI[ISCO88%in%3430]<-54
data$ISEI[ISCO88%in%3431]<-54
data$ISEI[ISCO88%in%3432]<-59
data$ISEI[ISCO88%in%3433]<-51
data$ISEI[ISCO88%in%3434]<-61
data$ISEI[ISCO88%in%3439]<-54
data$ISEI[ISCO88%in%344]<-56
data$ISEI[ISCO88%in%3440]<-56
data$ISEI[ISCO88%in%3441]<-56
data$ISEI[ISCO88%in%3442]<-57
data$ISEI[ISCO88%in%3443]<-56
data$ISEI[ISCO88%in%3444]<-46
data$ISEI[ISCO88%in%3449]<-56
data$ISEI[ISCO88%in%345]<-56
data$ISEI[ISCO88%in%3450]<-56
data$ISEI[ISCO88%in%3451]<-55
data$ISEI[ISCO88%in%3452]<-56
data$ISEI[ISCO88%in%346]<-43
data$ISEI[ISCO88%in%3460]<-43
data$ISEI[ISCO88%in%347]<-52
data$ISEI[ISCO88%in%3470]<-52
data$ISEI[ISCO88%in%3471]<-53
data$ISEI[ISCO88%in%3472]<-64
data$ISEI[ISCO88%in%3473]<-50
data$ISEI[ISCO88%in%3474]<-50
data$ISEI[ISCO88%in%3475]<-54
data$ISEI[ISCO88%in%348]<-38
data$ISEI[ISCO88%in%3480]<-38
data$ISEI[ISCO88%in%4]<-45
data$ISEI[ISCO88%in%40]<-45
data$ISEI[ISCO88%in%400]<-45
data$ISEI[ISCO88%in%4000]<-45
data$ISEI[ISCO88%in%41]<-45
data$ISEI[ISCO88%in%410]<-45
data$ISEI[ISCO88%in%4100]<-45
data$ISEI[ISCO88%in%411]<-51
data$ISEI[ISCO88%in%4110]<-51
data$ISEI[ISCO88%in%4111]<-51
data$ISEI[ISCO88%in%4112]<-50
data$ISEI[ISCO88%in%4113]<-50
data$ISEI[ISCO88%in%4114]<-51
data$ISEI[ISCO88%in%4115]<-53
data$ISEI[ISCO88%in%412]<-51
data$ISEI[ISCO88%in%4120]<-51
data$ISEI[ISCO88%in%4121]<-51
data$ISEI[ISCO88%in%4122]<-51
data$ISEI[ISCO88%in%413]<-36
data$ISEI[ISCO88%in%4130]<-36
data$ISEI[ISCO88%in%4131]<-32
data$ISEI[ISCO88%in%4132]<-43
data$ISEI[ISCO88%in%4133]<-45
data$ISEI[ISCO88%in%414]<-39
data$ISEI[ISCO88%in%4140]<-39
data$ISEI[ISCO88%in%4141]<-39
data$ISEI[ISCO88%in%4142]<-39
data$ISEI[ISCO88%in%4143]<-39
data$ISEI[ISCO88%in%4144]<-39
data$ISEI[ISCO88%in%419]<-39
data$ISEI[ISCO88%in%4190]<-39
data$ISEI[ISCO88%in%42]<-49
data$ISEI[ISCO88%in%420]<-49
data$ISEI[ISCO88%in%4200]<-49
data$ISEI[ISCO88%in%421]<-48
data$ISEI[ISCO88%in%4210]<-48
data$ISEI[ISCO88%in%4211]<-53
data$ISEI[ISCO88%in%4212]<-46
data$ISEI[ISCO88%in%4213]<-40
data$ISEI[ISCO88%in%4214]<-40
data$ISEI[ISCO88%in%4215]<-40
data$ISEI[ISCO88%in%422]<-52
data$ISEI[ISCO88%in%4220]<-52
data$ISEI[ISCO88%in%4221]<-52
data$ISEI[ISCO88%in%4222]<-52
data$ISEI[ISCO88%in%4223]<-52
data$ISEI[ISCO88%in%5]<-40
data$ISEI[ISCO88%in%50]<-40
data$ISEI[ISCO88%in%500]<-40
data$ISEI[ISCO88%in%5000]<-40
data$ISEI[ISCO88%in%51]<-38
data$ISEI[ISCO88%in%510]<-38
data$ISEI[ISCO88%in%5100]<-38
data$ISEI[ISCO88%in%511]<-34
data$ISEI[ISCO88%in%5110]<-34
data$ISEI[ISCO88%in%5111]<-34
data$ISEI[ISCO88%in%5112]<-34
data$ISEI[ISCO88%in%5113]<-34
data$ISEI[ISCO88%in%512]<-32
data$ISEI[ISCO88%in%5120]<-32
data$ISEI[ISCO88%in%5121]<-30
data$ISEI[ISCO88%in%5122]<-30
data$ISEI[ISCO88%in%5123]<-34
data$ISEI[ISCO88%in%513]<-25
data$ISEI[ISCO88%in%5130]<-25
data$ISEI[ISCO88%in%5131]<-25
data$ISEI[ISCO88%in%5132]<-25
data$ISEI[ISCO88%in%5133]<-25
data$ISEI[ISCO88%in%5139]<-25
data$ISEI[ISCO88%in%514]<-30
data$ISEI[ISCO88%in%5140]<-30
data$ISEI[ISCO88%in%5141]<-29
data$ISEI[ISCO88%in%5142]<-19
data$ISEI[ISCO88%in%5143]<-54
data$ISEI[ISCO88%in%5149]<-19
data$ISEI[ISCO88%in%515]<-43
data$ISEI[ISCO88%in%5150]<-43
data$ISEI[ISCO88%in%5151]<-43
data$ISEI[ISCO88%in%5152]<-43
data$ISEI[ISCO88%in%516]<-47
data$ISEI[ISCO88%in%5160]<-47
data$ISEI[ISCO88%in%5161]<-42
data$ISEI[ISCO88%in%5162]<-50
data$ISEI[ISCO88%in%5163]<-40
data$ISEI[ISCO88%in%5164]<-40
data$ISEI[ISCO88%in%5169]<-40
data$ISEI[ISCO88%in%52]<-43
data$ISEI[ISCO88%in%520]<-43
data$ISEI[ISCO88%in%5200]<-43
data$ISEI[ISCO88%in%521]<-43
data$ISEI[ISCO88%in%5210]<-43
data$ISEI[ISCO88%in%522]<-43
data$ISEI[ISCO88%in%5220]<-43
data$ISEI[ISCO88%in%523]<-37
data$ISEI[ISCO88%in%5230]<-37
data$ISEI[ISCO88%in%6]<-23
data$ISEI[ISCO88%in%60]<-23
data$ISEI[ISCO88%in%600]<-23
data$ISEI[ISCO88%in%6000]<-23
data$ISEI[ISCO88%in%61]<-23
data$ISEI[ISCO88%in%610]<-23
data$ISEI[ISCO88%in%6100]<-23
data$ISEI[ISCO88%in%611]<-23
data$ISEI[ISCO88%in%6110]<-23
data$ISEI[ISCO88%in%6111]<-23
data$ISEI[ISCO88%in%6112]<-23
data$ISEI[ISCO88%in%6113]<-23
data$ISEI[ISCO88%in%6114]<-23
data$ISEI[ISCO88%in%612]<-23
data$ISEI[ISCO88%in%6120]<-23
data$ISEI[ISCO88%in%6121]<-23
data$ISEI[ISCO88%in%6122]<-23
data$ISEI[ISCO88%in%6123]<-23
data$ISEI[ISCO88%in%6124]<-23
data$ISEI[ISCO88%in%6129]<-23
data$ISEI[ISCO88%in%613]<-23
data$ISEI[ISCO88%in%6130]<-23
data$ISEI[ISCO88%in%6131]<-23
data$ISEI[ISCO88%in%6132]<-27
data$ISEI[ISCO88%in%6133]<-28
data$ISEI[ISCO88%in%6134]<-28
data$ISEI[ISCO88%in%614]<-22
data$ISEI[ISCO88%in%6140]<-22
data$ISEI[ISCO88%in%6141]<-22
data$ISEI[ISCO88%in%6142]<-22
data$ISEI[ISCO88%in%615]<-28
data$ISEI[ISCO88%in%6150]<-28
data$ISEI[ISCO88%in%6151]<-28
data$ISEI[ISCO88%in%6152]<-28
data$ISEI[ISCO88%in%6153]<-28
data$ISEI[ISCO88%in%6154]<-28
data$ISEI[ISCO88%in%62]<-16
data$ISEI[ISCO88%in%620]<-16
data$ISEI[ISCO88%in%6200]<-16
data$ISEI[ISCO88%in%621]<-16
data$ISEI[ISCO88%in%6210]<-16
data$ISEI[ISCO88%in%7]<-34
data$ISEI[ISCO88%in%70]<-34
data$ISEI[ISCO88%in%700]<-34
data$ISEI[ISCO88%in%7000]<-34
data$ISEI[ISCO88%in%71]<-31
data$ISEI[ISCO88%in%710]<-31
data$ISEI[ISCO88%in%7100]<-31
data$ISEI[ISCO88%in%711]<-30
data$ISEI[ISCO88%in%7110]<-30
data$ISEI[ISCO88%in%7111]<-30
data$ISEI[ISCO88%in%7112]<-30
data$ISEI[ISCO88%in%7113]<-27
data$ISEI[ISCO88%in%712]<-30
data$ISEI[ISCO88%in%7120]<-30
data$ISEI[ISCO88%in%7121]<-29
data$ISEI[ISCO88%in%7122]<-29
data$ISEI[ISCO88%in%7123]<-26
data$ISEI[ISCO88%in%7124]<-29
data$ISEI[ISCO88%in%7129]<-30
data$ISEI[ISCO88%in%713]<-34
data$ISEI[ISCO88%in%7130]<-34
data$ISEI[ISCO88%in%7131]<-19
data$ISEI[ISCO88%in%7132]<-30
data$ISEI[ISCO88%in%7133]<-31
data$ISEI[ISCO88%in%7134]<-34
data$ISEI[ISCO88%in%7135]<-26
data$ISEI[ISCO88%in%7136]<-33
data$ISEI[ISCO88%in%7137]<-37
data$ISEI[ISCO88%in%7139]<-NA
data$ISEI[ISCO88%in%714]<-29
data$ISEI[ISCO88%in%7140]<-29
data$ISEI[ISCO88%in%7141]<-29
data$ISEI[ISCO88%in%7142]<-32
data$ISEI[ISCO88%in%7143]<-29
data$ISEI[ISCO88%in%72]<-34
data$ISEI[ISCO88%in%720]<-34
data$ISEI[ISCO88%in%7200]<-34
data$ISEI[ISCO88%in%721]<-31
data$ISEI[ISCO88%in%7210]<-31
data$ISEI[ISCO88%in%7211]<-29
data$ISEI[ISCO88%in%7212]<-30
data$ISEI[ISCO88%in%7213]<-33
data$ISEI[ISCO88%in%7214]<-30
data$ISEI[ISCO88%in%7215]<-30
data$ISEI[ISCO88%in%7216]<-30
data$ISEI[ISCO88%in%722]<-35
data$ISEI[ISCO88%in%7220]<-35
data$ISEI[ISCO88%in%7221]<-33
data$ISEI[ISCO88%in%7222]<-40
data$ISEI[ISCO88%in%7223]<-34
data$ISEI[ISCO88%in%7224]<-24
data$ISEI[ISCO88%in%723]<-34
data$ISEI[ISCO88%in%7230]<-34
data$ISEI[ISCO88%in%7231]<-34
data$ISEI[ISCO88%in%7232]<-42
data$ISEI[ISCO88%in%7233]<-33
data$ISEI[ISCO88%in%7234]<-23
data$ISEI[ISCO88%in%724]<-40
data$ISEI[ISCO88%in%7240]<-40
data$ISEI[ISCO88%in%7241]<-40
data$ISEI[ISCO88%in%7242]<-39
data$ISEI[ISCO88%in%7243]<-41
data$ISEI[ISCO88%in%7244]<-40
data$ISEI[ISCO88%in%7245]<-38
data$ISEI[ISCO88%in%73]<-34
data$ISEI[ISCO88%in%730]<-34
data$ISEI[ISCO88%in%7300]<-34
data$ISEI[ISCO88%in%731]<-38
data$ISEI[ISCO88%in%7310]<-38
data$ISEI[ISCO88%in%7311]<-38
data$ISEI[ISCO88%in%7312]<-38
data$ISEI[ISCO88%in%7313]<-38
data$ISEI[ISCO88%in%732]<-28
data$ISEI[ISCO88%in%7320]<-28
data$ISEI[ISCO88%in%7321]<-27
data$ISEI[ISCO88%in%7322]<-29
data$ISEI[ISCO88%in%7323]<-29
data$ISEI[ISCO88%in%7324]<-29
data$ISEI[ISCO88%in%733]<-29
data$ISEI[ISCO88%in%7330]<-29
data$ISEI[ISCO88%in%7331]<-29
data$ISEI[ISCO88%in%7332]<-29
data$ISEI[ISCO88%in%734]<-40
data$ISEI[ISCO88%in%7340]<-40
data$ISEI[ISCO88%in%7341]<-40
data$ISEI[ISCO88%in%7342]<-40
data$ISEI[ISCO88%in%7343]<-42
data$ISEI[ISCO88%in%7344]<-40
data$ISEI[ISCO88%in%7345]<-37
data$ISEI[ISCO88%in%7346]<-38
data$ISEI[ISCO88%in%74]<-33
data$ISEI[ISCO88%in%740]<-33
data$ISEI[ISCO88%in%7400]<-33
data$ISEI[ISCO88%in%741]<-30
data$ISEI[ISCO88%in%7410]<-30
data$ISEI[ISCO88%in%7411]<-30
data$ISEI[ISCO88%in%7412]<-31
data$ISEI[ISCO88%in%7413]<-30
data$ISEI[ISCO88%in%7414]<-30
data$ISEI[ISCO88%in%7415]<-30
data$ISEI[ISCO88%in%7416]<-30
data$ISEI[ISCO88%in%742]<-33
data$ISEI[ISCO88%in%7420]<-33
data$ISEI[ISCO88%in%7421]<-33
data$ISEI[ISCO88%in%7422]<-33
data$ISEI[ISCO88%in%7423]<-33
data$ISEI[ISCO88%in%7424]<-33
data$ISEI[ISCO88%in%743]<-36
data$ISEI[ISCO88%in%7430]<-36
data$ISEI[ISCO88%in%7431]<-29
data$ISEI[ISCO88%in%7432]<-29
data$ISEI[ISCO88%in%7433]<-45
data$ISEI[ISCO88%in%7434]<-36
data$ISEI[ISCO88%in%7435]<-36
data$ISEI[ISCO88%in%7436]<-33
data$ISEI[ISCO88%in%7437]<-28
data$ISEI[ISCO88%in%744]<-31
data$ISEI[ISCO88%in%7440]<-31
data$ISEI[ISCO88%in%7441]<-31
data$ISEI[ISCO88%in%7442]<-31
data$ISEI[ISCO88%in%75]<-42
data$ISEI[ISCO88%in%750]<-42
data$ISEI[ISCO88%in%7500]<-42
data$ISEI[ISCO88%in%751]<-42
data$ISEI[ISCO88%in%7510]<-42
data$ISEI[ISCO88%in%752]<-39
data$ISEI[ISCO88%in%7520]<-39
data$ISEI[ISCO88%in%753]<-26
data$ISEI[ISCO88%in%7530]<-26
data$ISEI[ISCO88%in%8]<-31
data$ISEI[ISCO88%in%80]<-31
data$ISEI[ISCO88%in%800]<-31
data$ISEI[ISCO88%in%8000]<-31
data$ISEI[ISCO88%in%81]<-30
data$ISEI[ISCO88%in%810]<-30
data$ISEI[ISCO88%in%8100]<-30
data$ISEI[ISCO88%in%811]<-35
data$ISEI[ISCO88%in%8110]<-35
data$ISEI[ISCO88%in%8111]<-35
data$ISEI[ISCO88%in%8112]<-35
data$ISEI[ISCO88%in%8113]<-35
data$ISEI[ISCO88%in%812]<-30
data$ISEI[ISCO88%in%8120]<-30
data$ISEI[ISCO88%in%8121]<-31
data$ISEI[ISCO88%in%8122]<-30
data$ISEI[ISCO88%in%8123]<-28
data$ISEI[ISCO88%in%8124]<-30
data$ISEI[ISCO88%in%813]<-22
data$ISEI[ISCO88%in%8130]<-22
data$ISEI[ISCO88%in%8131]<-22
data$ISEI[ISCO88%in%8139]<-22
data$ISEI[ISCO88%in%814]<-27
data$ISEI[ISCO88%in%8140]<-27
data$ISEI[ISCO88%in%8141]<-27
data$ISEI[ISCO88%in%8142]<-27
data$ISEI[ISCO88%in%8143]<-27
data$ISEI[ISCO88%in%815]<-35
data$ISEI[ISCO88%in%8150]<-35
data$ISEI[ISCO88%in%8151]<-35
data$ISEI[ISCO88%in%8152]<-35
data$ISEI[ISCO88%in%8153]<-35
data$ISEI[ISCO88%in%8154]<-35
data$ISEI[ISCO88%in%8155]<-35
data$ISEI[ISCO88%in%8159]<-35
data$ISEI[ISCO88%in%816]<-32
data$ISEI[ISCO88%in%8160]<-32
data$ISEI[ISCO88%in%8161]<-33
data$ISEI[ISCO88%in%8162]<-27
data$ISEI[ISCO88%in%8163]<-33
data$ISEI[ISCO88%in%817]<-26
data$ISEI[ISCO88%in%8170]<-26
data$ISEI[ISCO88%in%8171]<-26
data$ISEI[ISCO88%in%8172]<-26
data$ISEI[ISCO88%in%82]<-32
data$ISEI[ISCO88%in%820]<-32
data$ISEI[ISCO88%in%8200]<-32
data$ISEI[ISCO88%in%821]<-36
data$ISEI[ISCO88%in%8210]<-36
data$ISEI[ISCO88%in%8211]<-36
data$ISEI[ISCO88%in%8212]<-30
data$ISEI[ISCO88%in%822]<-30
data$ISEI[ISCO88%in%8220]<-30
data$ISEI[ISCO88%in%8221]<-30
data$ISEI[ISCO88%in%8222]<-30
data$ISEI[ISCO88%in%8223]<-30
data$ISEI[ISCO88%in%8224]<-30
data$ISEI[ISCO88%in%8229]<-30
data$ISEI[ISCO88%in%823]<-30
data$ISEI[ISCO88%in%8230]<-30
data$ISEI[ISCO88%in%8231]<-30
data$ISEI[ISCO88%in%8232]<-30
data$ISEI[ISCO88%in%824]<-29
data$ISEI[ISCO88%in%8240]<-29
data$ISEI[ISCO88%in%825]<-38
data$ISEI[ISCO88%in%8250]<-38
data$ISEI[ISCO88%in%8251]<-38
data$ISEI[ISCO88%in%8252]<-38
data$ISEI[ISCO88%in%8253]<-38
data$ISEI[ISCO88%in%826]<-30
data$ISEI[ISCO88%in%8260]<-30
data$ISEI[ISCO88%in%8261]<-29
data$ISEI[ISCO88%in%8262]<-29
data$ISEI[ISCO88%in%8263]<-32
data$ISEI[ISCO88%in%8264]<-24
data$ISEI[ISCO88%in%8265]<-32
data$ISEI[ISCO88%in%8266]<-32
data$ISEI[ISCO88%in%8269]<-32
data$ISEI[ISCO88%in%827]<-29
data$ISEI[ISCO88%in%8270]<-29
data$ISEI[ISCO88%in%8271]<-29
data$ISEI[ISCO88%in%8272]<-29
data$ISEI[ISCO88%in%8273]<-29
data$ISEI[ISCO88%in%8274]<-29
data$ISEI[ISCO88%in%8275]<-29
data$ISEI[ISCO88%in%8276]<-29
data$ISEI[ISCO88%in%8277]<-29
data$ISEI[ISCO88%in%8278]<-29
data$ISEI[ISCO88%in%8279]<-29
data$ISEI[ISCO88%in%828]<-31
data$ISEI[ISCO88%in%8280]<-31
data$ISEI[ISCO88%in%8281]<-30
data$ISEI[ISCO88%in%8282]<-34
data$ISEI[ISCO88%in%8283]<-34
data$ISEI[ISCO88%in%8284]<-30
data$ISEI[ISCO88%in%8285]<-30
data$ISEI[ISCO88%in%8286]<-30
data$ISEI[ISCO88%in%8287]<-NA
data$ISEI[ISCO88%in%829]<-26
data$ISEI[ISCO88%in%8290]<-26
data$ISEI[ISCO88%in%83]<-32
data$ISEI[ISCO88%in%830]<-32
data$ISEI[ISCO88%in%8300]<-32
data$ISEI[ISCO88%in%831]<-36
data$ISEI[ISCO88%in%8310]<-36
data$ISEI[ISCO88%in%8311]<-41
data$ISEI[ISCO88%in%8312]<-32
data$ISEI[ISCO88%in%832]<-34
data$ISEI[ISCO88%in%8320]<-34
data$ISEI[ISCO88%in%8321]<-30
data$ISEI[ISCO88%in%8322]<-30
data$ISEI[ISCO88%in%8323]<-30
data$ISEI[ISCO88%in%8324]<-34
data$ISEI[ISCO88%in%833]<-26
data$ISEI[ISCO88%in%8330]<-26
data$ISEI[ISCO88%in%8331]<-26
data$ISEI[ISCO88%in%8332]<-26
data$ISEI[ISCO88%in%8333]<-28
data$ISEI[ISCO88%in%8334]<-28
data$ISEI[ISCO88%in%834]<-32
data$ISEI[ISCO88%in%8340]<-32
data$ISEI[ISCO88%in%840]<-24
data$ISEI[ISCO88%in%8400]<-24
data$ISEI[ISCO88%in%9]<-20
data$ISEI[ISCO88%in%90]<-20
data$ISEI[ISCO88%in%900]<-20
data$ISEI[ISCO88%in%9000]<-20
data$ISEI[ISCO88%in%91]<-25
data$ISEI[ISCO88%in%910]<-25
data$ISEI[ISCO88%in%9100]<-25
data$ISEI[ISCO88%in%911]<-29
data$ISEI[ISCO88%in%9110]<-29
data$ISEI[ISCO88%in%9111]<-29
data$ISEI[ISCO88%in%9112]<-28
data$ISEI[ISCO88%in%9113]<-29
data$ISEI[ISCO88%in%912]<-28
data$ISEI[ISCO88%in%9120]<-28
data$ISEI[ISCO88%in%913]<-16
data$ISEI[ISCO88%in%9130]<-16
data$ISEI[ISCO88%in%9131]<-16
data$ISEI[ISCO88%in%9132]<-16
data$ISEI[ISCO88%in%9133]<-16
data$ISEI[ISCO88%in%914]<-23
data$ISEI[ISCO88%in%9140]<-23
data$ISEI[ISCO88%in%9141]<-23
data$ISEI[ISCO88%in%9142]<-23
data$ISEI[ISCO88%in%915]<-27
data$ISEI[ISCO88%in%9150]<-27
data$ISEI[ISCO88%in%9151]<-25
data$ISEI[ISCO88%in%9152]<-27
data$ISEI[ISCO88%in%9153]<-27
data$ISEI[ISCO88%in%916]<-23
data$ISEI[ISCO88%in%9160]<-23
data$ISEI[ISCO88%in%9161]<-23
data$ISEI[ISCO88%in%9162]<-23
data$ISEI[ISCO88%in%92]<-16
data$ISEI[ISCO88%in%920]<-16
data$ISEI[ISCO88%in%9200]<-16
data$ISEI[ISCO88%in%921]<-16
data$ISEI[ISCO88%in%9210]<-16
data$ISEI[ISCO88%in%9211]<-16
data$ISEI[ISCO88%in%9212]<-16
data$ISEI[ISCO88%in%9213]<-16
data$ISEI[ISCO88%in%93]<-23
data$ISEI[ISCO88%in%930]<-23
data$ISEI[ISCO88%in%9300]<-23
data$ISEI[ISCO88%in%931]<-21
data$ISEI[ISCO88%in%9310]<-21
data$ISEI[ISCO88%in%9311]<-21
data$ISEI[ISCO88%in%9312]<-21
data$ISEI[ISCO88%in%9313]<-21
data$ISEI[ISCO88%in%932]<-20
data$ISEI[ISCO88%in%9320]<-20
data$ISEI[ISCO88%in%9321]<-20
data$ISEI[ISCO88%in%9322]<-24
data$ISEI[ISCO88%in%933]<-29
data$ISEI[ISCO88%in%9330]<-29
data$ISEI[ISCO88%in%9331]<-22
data$ISEI[ISCO88%in%9332]<-22
data$ISEI[ISCO88%in%9333]<-30
return(data)
}