|
|
A054721
|
|
Number of 6-ary sequences with primitive period n.
|
|
7
|
|
|
1, 6, 30, 210, 1260, 7770, 46410, 279930, 1678320, 10077480, 60458370, 362797050, 2176734420, 13060694010, 78363884130, 470184976590, 2821108227840, 16926659444730, 101559946544280, 609359740010490, 3656158379595540, 21936950640097710, 131621703479470050
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Equivalently, output sequences with primitive period n from a simple cycling shift register.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = Sum mu(d)*6^(n/d); d|n.
G.f.: 1 + 6 * Sum_{k>=1} mu(k) * x^k / (1 - 6*x^k). - Ilya Gutkovskiy, Apr 14 2021
|
|
MAPLE
|
with(numtheory):
a:= n-> `if`(n=0, 1, add(mobius(d)*6^(n/d), d=divisors(n))):
|
|
MATHEMATICA
|
a[0] = 1; a[n_] := Sum[MoebiusMu[d]*6^(n/d), {d, Divisors[n]}]; Table[a[n], {n, 0, 30}] (* Jean-François Alcover, Mar 11 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|