Я недавно узнал о CNS и FNS, и поскольку они выглядят настолько изящными для меня, я решил попробовать и реализовать методы генерации комбинаций и перестановок с использованием этих методов. Я закончил свой метод, чтобы преобразовать из n выбрать k комбинации с рейтингом CSN и наоборот, но я ударяю головой о стену, пытаясь сделать то же самое с n выбрать k (уникальные) перестановки.Вычисление факторического ранга перестановки (N выберите K)
Благодаря @Joshua я получил unranking (FNS перестановочной) метод работы:
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;
}
Это моя текущая попытка рейтинг (перестановку FNS) Метод:
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;
}
И вот вспомогательные функции, которые я использую:
НеПроблема заключается в том, метод Pr_Rank()
только возвращает правильный ранг, когда n = k
(demo):
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
Я проводил сам, используя статью Википедии я связан выше, и this MSDN article, я знаю, что ни из них созерцают подмножества k-размера, но я полностью в темноте, какая бы такая логика выглядела бы ...
Я также пробовал поиск в Google и поиск e xisting вопросы/ответы, но ничего существенного не появилось.
Рад, что вы смогли это понять! Я просто не успел заглянуть в нее ... –