OFFSET
1,1
COMMENTS
The sequence that gives the order of the permutation is A002326.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
EXAMPLE
For n=4 the permutation is 15263748, which has cycle structure (1)(253)(467)(8).
MAPLE
f:= proc(n) local p, m; uses GroupTheory;
p:= Perm([seq(`if`(m::odd, (m+1)/2, n+m/2), m=1..2*n)]);
nops(PermCycleType(p)) + 2*n - nops(PermSupport(p))
end proc:
map(f, [$1..100]); # Robert Israel, Jul 09 2026
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Jeffrey Shallit, Sep 16 2019
STATUS
approved
