匿名递归 PHP 函数

Question

是否可以有一个既递归又匿名的 PHP 函数？这是我尝试让它工作，但它没有传递函数名称。

$factorial = function( $n ) use ( $factorial ) {
    if( $n <= 1 ) return 1;
    return $factorial( $n - 1 ) * $n;
};
print $factorial( 5 );

我也知道这是实现阶乘的一种不好的方法，这只是一个例子。

Answer 1

为了使其工作，您需要传递 $factorial 作为参考

$factorial = function( $n ) use ( &$factorial ) {
    if( $n == 1 ) return 1;
    return $factorial( $n - 1 ) * $n;
};
print $factorial( 5 );

Answer 2

我知道这可能不是一个简单的方法，但我了解了一种名为 "fix" 来自函数式语言。 Haskell 的 fix 函数通常被称为 Y 组合器< /a>，这是最著名的定点组合器之一。

不动点是一个不被函数改变的值：函数f的不动点是任何x，使得x = f(x)。定点组合器y是一个为任何函数f返回一个定点的函数。由于 y(f) 是 f 的不动点，因此有 y(f)=f(y(f))。

本质上，Y 组合器创建一个新函数，它接受原始函数的所有参数，再加上一个附加参数，即递归函数。使用柯里化表示法，其工作原理更加明显。不要将参数写在括号中 (f(x,y,...))，而是将它们写在函数后面：fxy ...。 Y组合器定义为Y f = f (Y f)；或者，递归函数只有一个参数，Y fx = f (Y f) x。

由于 PHP 不会自动使用 curry 函数，因此修复 有点麻烦 工作，但我认为这很有趣。

function fix( $func )
{
    return function() use ( $func )
    {
        $args = func_get_args();
        array_unshift( $args, fix($func) );
        return call_user_func_array( $func, $args );
    };
}

$factorial = function( $func, $n ) {
    if ( $n == 1 ) return 1;
    return $func( $n - 1 ) * $n;
};
$factorial = fix( $factorial );

print $factorial( 5 );

请注意，这与其他人发布的简单闭包解决方案几乎相同，但是函数 fix 为您创建了闭包。定点组合器比使用闭包稍微复杂一些，但更通用，并且有其他用途。虽然闭包方法更适合 PHP（它不是一种非常强大的函数式语言），但最初的问题更多的是练习而不是生产，因此 Y 组合器是一种可行的方法。

Answer 3

虽然不用于实际使用，但 C 级扩展 mpyw-junks/phpext-callee 提供匿名递归无需分配变量。

<?php

var_dump((function ($n) {
    return $n < 2 ? 1 : $n * callee()($n - 1);
})(5));

// 5! = 5 * 4 * 3 * 2 * 1 = int(120)

Answer 4

使用匿名类（PHP 7+），不定义变量：

echo (new class {
    function __invoke($n) {
        return $n < 2 ? 1 : $n * $this($n - 1);
    }
})(5);

Answer 5

在较新版本的 PHP 中，您可以这样做：

$x = function($depth = 0) {
    if($depth++)
        return;

    $this($depth);
    echo "hi\n";
};
$x = $x->bindTo($x);
$x();

这可能会导致奇怪的行为。

Answer 6

您可以在 PHP 7.1+ 中使用 Y Combinator，如下所示：

function Y
($le)
{return
    (function ($f) 
     {return
        $f($f);
     })(function ($f) use ($le) 
        {return
            $le(function ($x) use ($f) 
                {return
                    $f($f)($x);
                });
        });
}

$le =
function ($factorial)
{return
    function
    ($n) use ($factorial)
    {return
        $n < 2 ? $n
        : $n * $factorial($n - 1);
    };
};

$factorial = Y($le);

echo $factorial(1) . PHP_EOL; // 1
echo $factorial(2) . PHP_EOL; // 2
echo $factorial(5) . PHP_EOL; // 120

尝试一下：https://3v4l.org/7AUn2

源代码来自： https://github.com /whitephp/the-little-phper/blob/master/src/chapter_9.php