OFFSET
1,3
COMMENTS
A permutation is defined to be aperiodic if every cyclic rotation of {1..n} acts on the cycle decomposition to produce a different digraph.
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..200
FORMULA
a(n) = A306669(n) * n.
a(n) = Sum_{d|n} mu(n/d)*(n/d)^d*d!. - Andrew Howroyd, Aug 19 2019
EXAMPLE
The a(4) = 16 aperiodic permutations:
(1243) (1324) (1342) (1423)
(2134) (2314) (2413) (2431)
(3124) (3142) (3241) (3421)
(4132) (4213) (4231) (4312)
MATHEMATICA
Table[Length[Select[Permutations[Range[n]], UnsameQ@@NestList[RotateRight[#/.k_Integer:>If[k==n, 1, k+1]]&, #, n-1]&]], {n, 6}]
PROG
(PARI) a(n) = sumdiv(n, d, moebius(n/d)*(n/d)^d*d!); \\ Andrew Howroyd, Aug 19 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 04 2019
EXTENSIONS
Terms a(10) and beyond from Andrew Howroyd, Aug 19 2019
STATUS
approved