如何在PHP中实现MS Excel的“IRR()”公式?
我尝试了this page中提到的算法,但结果并不准确,而且速度非常慢。
答案 0 :(得分:4)
经过一段时间的调查,我最终得到了下面复制的功能。
它基于this question。
function IRR($investment, $flow, $precision = 0.001) {
$min = 0;
$max = 1;
$net_present_value = 1;
while(abs($net_present_value - $investment) > $precision) {
$net_present_value = 0;
$guess = ($min + $max) / 2;
foreach ($flow as $period => $cashflow) {
$net_present_value += $cashflow / (1 + $guess) ** ($period + 1);
}
if ($net_present_value - $investment > 0) {
$min = $guess;
} else {
$max = $guess;
}
}
return $guess * 100;
}
答案 1 :(得分:0)
这是根据Tomas的答案修改的。它通过在开始时进行检查来停止无限循环,以确保现金流大于投资。我还提高了精度,最多可以运行20次。
private function IRR($investment, $flow, $precision = 0.000001) {
if (array_sum($flow) < $investment):
return 0;
endif;
$maxIterations = 20;
$i =0;
if (is_array($flow)):
$min = 0;
$max = 1;
$net_present_value = 1;
while ((abs($net_present_value - $investment) > $precision)&& ($i < $maxIterations)) {
$net_present_value = 0;
$guess = ($min + $max) / 2;
foreach ($flow as $period => $cashflow) {
$net_present_value += $cashflow / (1 + $guess) ** ($period + 1);
}
if ($net_present_value - $investment > 0) {
$min = $guess;
} else {
$max = $guess;
}
$i++;
}
return $guess * 100;
else:
return 0;
endif;
}