ܣ

ʽ
[rate, ndata] = lendingrate(sumMoney, nMoney)

sumMoneyʵʵֵǮ
nMoney     : ÿʱʵʻ˲Ϊ1*nn*1ľĬϱʾӵ1λʱ䵽nλʱĻ˱Ϊn*2ľ1бʾӦڼλʱ䣬2бʾע⣬ʱ1ݲС1.

rate : صȼ۵ĵλʱ,λʱΪ·ݣ򷵻ʣλʱΪ꣬Ϊʡ
ndatam*2ľ1бʾӦڼλʱ䣬2бʾӦʵʵڼλʱĵЧӦԭеS1, S2, ..., Sn

˵
1. ҪһЩ⣬ʵʴŵĵȼʡ
2. ԭһԽΪSԪn»ÿ»ΪD1, D2, ..., DnôԵȼ۳ɣһνʱܹnݣÿһΪS1, S2, ..., SnԪڵ1, 2, ...,n ȫ壬ÿ»ΪD1, D2, ..., DnôΪr £ɵõ±ʽ
S = S1 + S2 + ... + Sn
D1 = S1 * (1+r)^1
D2 = S2 * (1+r)^2
...
Dn = Sn * (1+r)^n

1
//ĳĳƽ̨10000Ԫܹ6£·ſʱƽ̨ѵȡ2000Ԫĳʵʵ8000Ԫĳƽ̨嵥пӵ16£ÿλϢԼƽ̨ѷֱΪ3000, 2500, 2200, 2000, 1800, 1600
//ĳδʣ
//ڳУûѷѣｫѷ㵽ʵȥ˸տʼʱĳʵʽ = 8000 Ԫ
s = 8000;
x = [3000, 2500, 2200, 2000, 1800, 1600];
[r, ndata] = lendingrate(s, x)//سõ½ĳʴﵽ18.48%
r =
[ 0.18480957222332 ]
ndata =
[ 1.00000000000000    2532.05246676935
  2.00000000000000    1780.91380402022
  3.00000000000000    1322.74770923474
  4.00000000000000    1014.92927275192
  5.00000000000000    770.956250600379
  6.00000000000000    578.400496623390 ]
  
2
//ĳĳƽ̨10000Ԫ·ſʱƽ̨ѵȡ2000Ԫĳʵʵ8000Ԫܹ3λ壬ֱڵ1,3,8Ϊ5000, 4000, 3000
s = 8000;
x =
[ 1.00000000000000    5000.00000000000
  3.00000000000000    4000.00000000000
  8.00000000000000    3000.00000000000 ]
[r,z] =LendingRate(s,x)//سõ½ĳʽӽ14.76%
r =
[ 0.14764261846326 ]
z =
[ 1.00000000000000    4356.75698998976
  3.00000000000000    2646.30555393507
  8.00000000000000    996.937456075166 ]
