自己写的从m个数中任取n个数的组合算法

        遇到了一个求m个数中任选n个的全部组合算法,在网上查了好久,决定自己写一个.顺便写了元素交换函数和替代print_r的数组元素显示函数,毕竟我们更习惯于{*,*,*,*}的数组显示风格,但是这个函数只支持一维数组哟.

    说明一下,这个函数只是生成了组合元素的二进制版本,你还需要将其转换为自己需要的数组.比如我这里生成的一个组合为:{1,1,0,0,1},表示去5个数中第1,2,5个元素.其他类推.还有什么问题给我联系.

function swap(&$a,&$b){      //交换函数
    $temp = $a;
    $a = $b;
    $b = $temp;
}
function printarray($a){        //用我们习惯的方式显示数组元素
    echo "{";
    foreach($a as $k => $v){
        if($k == 0) echo $v;
        else echo ",".$v;
    }
    echo "}";    
}

function zuhe($m,$n){     //求m个数中任意n个数的组合
    for($i=0;$i<$n;$i++) $p[$i] = 1;            //前n个数置1,后面的都为0
       for($i=$n;$i<$m;$i++) $p[$i] = 0;
    printarray($p);
    $pp = $n-1;                                   //下一步要交换的1的位置

        $pt = $m;                                      //尾部指针,记录当前要交换0的截至位置
    while($pp>=0){
        $p1 = $pp;                           //当前要交换的值为1的位置(也就是指针)
        $p0 = $pp+1;                       //要交换的值为0的位置
        while($p0<$pt){                    //要交换的0还未到截至位置
            
            swap($p[$p1],$p[$p0]);    //0和1交换
            printarray($p);
            $p1++;                               //指针后移
            $p0++;
        }
        $pp--;                                //下一步要交换的1的位置前移

           $pt--;                                  //要交换0的截至位置前移
    }
}
zuhe(8,5);                                     //测试从8个数中选5个的组合