OFFSET
0,2
COMMENTS
Equivalently, output sequences with primitive period n from a simple cycling shift register.
REFERENCES
E. N. Gilbert and J. Riordan, Symmetry types of periodic sequences, Illinois J. Math., 5 (1961), 657-665.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..450
FORMULA
Sum mu(d)*5^(n/d); d|n.
a(0) = 1, a(n) = n * A001692(n).
G.f.: 1 + 5 * Sum_{k>=1} mu(k) * x^k / (1 - 5*x^k). - Ilya Gutkovskiy, Apr 14 2021
MAPLE
with(numtheory):
a:= n-> `if`(n=0, 1, add(mobius(d)*5^(n/d), d=divisors(n))):
seq(a(n), n=0..30); # Alois P. Heinz, Oct 21 2012
MATHEMATICA
a[0] = 1; a[n_] := Sum[MoebiusMu[d]*5^(n/d), {d, Divisors[n]}]; Table[a[n], {n, 0, 23}] (* Jean-François Alcover, Mar 11 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 20 2000
STATUS
approved