ResiDuaL Story

* ########################################### * 9. 퇴직시점별 Peak Value == 퇴직연기시 납부할 추가 보험료 고려.. * ########################################### * 사업주 부담분 포함     gen pval = .       lab var pval "정점가치"       su yage       loc Amin = r(min)       loc Amax = r(max) * 법정수급연령[구 60세]는 불필요...이후 시점이 없기때문임.         forvalues myval = `Amin'(1)`Amax'  {    // 퇴직연기시 최대기대자산값 구하기.       by sn: gen TempMax = epw if yage == `myval'       by sn: replace TempMax = max(TempMax[_n-1], epw) if yage >= `myval'       by sn: replace TempMax = TempMax[_N] if yage >= `myval'       by sn: gen MaxAge = yage if epw == TempMax      // 최대기대자산의 획득 연령       by sn: replace MaxAge = sum(MaxAge) if yage >= `myval'       by sn: replace MaxAge = MaxAge[_N] if yage >= `myval'   ...

* 10.3. 퇴직연기시 최대 기대효용과 현재 퇴직시 기대효용의 차이    loc mygamma = int(`Gamma'*100)   // 정수화: 감마는 1보다 작고 소수점 두 자리..   loc mykappa = int(`Kappa'*100)   // 정수화: 카파는 1보다 크고 소수점 두 자리    gen opv_g`mygamma'_k`mykappa' = .    lab var opv_g`mygamma'_k`mykappa' "Option Value[G=`Gamma',K=`Kappa']"    su yr    loc YrMin = r(min)    loc YrMax = r(max) forvalues myval = `YrMin'(1)`YrMax'  {         by sn: gen TempMax = Vh_y`myval' if yr == `myval'       by sn: replace TempMax = max(TempMax[_n-1], Vh_y`myval') if yr >= `myval'       by sn: replace TempMax = TempMax[_N] if yr >= `myval' ** 퇴직연기를 통해 얻을 수 있는 최대기대자산의 효용        by sn: gen Vh_max_y`myval' = TempMax - Vh_y`myval' if  yr == `myval'  //  ** Option Value  // 퇴직연기에 따른 최대기대자산에서 현재 퇴직하는 경우의 기대자산의 차이    by sn: replace opv_g`mygam...