第三次作业

某人想用分期付款的方式购买一套现价为200万的房，如果他首期支付一笔款项后，在今后的30 年内的每个月末付款6000元即可付清房款。假设每月复利一次的年名义利率为(5.4\%)。计算他首期付款的金额。
月实际利率为(j=5.4 \% / 12=0.45 \%)
设首期付款额为X 万元，则

#R
a<-function(n,i){(1-(1+ i)^(-n ))/i}
200-0.6*a(36,0.0045)

2. 投资者将在30 年后退休，他计划从现在开始，每年初向基金存入2 万元，如果基金的年收益率为5%，则他在退休时有多少退休金？
   他在退休时的养老金累积值为
   

#R
a<-function(n,i){(1-(1+ i)^(-n ))/i}
s<-function(n ,i){a(n,i)*(1+ i )^n}
2*s(30,0.05)*(1+0.05)