Cálculo del rango factorádico de una permutación (N elige K)

Recientemente he aprendido sobreCNS yF NSy como me parecen muy elegantes, decidí probar e implementar métodos para generar combinaciones y permutaciones usando esas técnicas. Terminé mi método para convertir den elegir k combinaciones a un rango de CSN y viceversa, pero estoy golpeando mi cabeza contra la pared tratando de hacer lo mismo conn elegir k Permutaciones (únicas).

Gracias a@Joshua tengo eldesorganización (FNS a permutación) método de trabajo:

function Pr_Unrank($n, $k, $rank) { // rank starts at 1
    if ($n >= $k) {
        if (($rank > 0) && ($rank <= Pr($n, $k))) {
            $rank--;
            $result = array();
            $factoriadic = array();

            for ($i = 1; $i <= ($n - $k); ++$i) {
                $rank *= $i;
            }

            for ($j = 1; $j <= $n; ++$j) {
                $factoriadic[$n - $j] = ($rank % $j) + 1; $rank /= $j;
            }

            for ($i = $n - 1; $i >= 0; --$i) {
                $result[$i] = $factoriadic[$i];

                for ($j = $i + 1; $j < $n; ++$j) {
                    if ($result[$j] >= $result[$i]) {
                        ++$result[$j];
                    }
                }
            }

            return array_reverse(array_slice($result, 0 - $k));
        }
    }

    return false;
}

Este es mi intento actual declasificación (permutación a FNS) método:

function Pr_Rank($n, $k, $permutation) {
    if ($n >= $k) {
        $result = range(1, $n);
        $factoriadic = array();

        foreach ($permutation as $key => $value) {
            $factoriadic[$k - $key - 1] = array_search($value, $result);
            array_splice($result, $factoriadic[$k - $key - 1], 1);
        }

        $result = 1;

        foreach (array_filter($factoriadic) as $key => $value) {
            $result += F($key) * $value;
        }

        return $result;
    }

    return false;
}

Y estas son las funciones de ayuda que estoy usando:

function F($n) { // Factorial
    return array_product(range($n, 1));
}

function Pr($n, $k) { // Permutations (without Repetitions)
    return array_product(range($n - $k + 1, $n));
}

El problema es,laPr_Rank() Método solo devuelve el rango correcto cuandon = k (manifestación):

var_dump(Pr_Rank(5, 2, Pr_Unrank(5, 2, 10))); // 3, should be 10
var_dump(Pr_Rank(5, 3, Pr_Unrank(5, 3, 10))); // 4, should be 10
var_dump(Pr_Rank(5, 5, Pr_Unrank(5, 5, 10))); // 10, it's correct

Me guié usando el artículo de Wikipedia que vinculé arriba yeste artículo de MSDNSé que ninguno de ellos contempla subconjuntos de tamaño K, pero estoy completamente en la oscuridad a qué se parecería tal lógica ...

También intenté buscar en Google y buscar preguntas / respuestas existentes, pero aún no se ha encontrado nada relevante.

Respuestas a la pregunta(1)

Su respuesta a la pregunta