|
|
A032166
|
|
Number of aperiodic necklaces of n beads of 11 colors.
|
|
3
|
|
|
11, 55, 440, 3630, 32208, 295020, 2783880, 26793030, 261994040, 2593726344, 25937424600, 261535549220, 2655593241840, 27124986721140, 278483211283552, 2871858103075830, 29732178147017280
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Number of monic irreducible polynomials of degree n over GF(11). # Robert Israel, Jan 07 2015
|
|
LINKS
|
|
|
FORMULA
|
"CHK" (necklace, identity, unlabeled) transform of 11, 0, 0, 0...
a(n) = Sum_{d|n} mu(d)*11^(n/d)/n.
G.f.: Sum_{k>=1} mu(k)*log(1/(1 - 11*x^k))/k. - Ilya Gutkovskiy, May 19 2019
|
|
MAPLE
|
f:= (n, p) -> add(numtheory:-mobius(d)*p^(n/d), d=numtheory:-divisors(n))/n:
|
|
MATHEMATICA
|
f[d_]:=MoebiusMu[d] 11^(n/d)/n; a[n_]:=Total[f/@Divisors[n]]; a[0]=1; Table[a[n], {n, 1, 30}] (* Vincenzo Librandi, Oct 14 2017 *)
|
|
PROG
|
(PARI) a(n) = sumdiv(n, d, moebius(d)*11^(n/d))/n; \\ Michel Marcus, Jan 07 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|