OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
J. A. Siehler, The Finite Lamplighter Groups: A Guided Tour, College Mathematics Journal, Vol. 43, No. 3 (May 2012), pp. 203-211. - From N. J. A. Sloane, Oct 05 2012
FORMULA
a(n) = Sum_{k=0..n-1} ( 1/gcd(n,k) 2^s phi(gcd(n,k)/s), s in divisors(gcd(n,k)) ).
MATHEMATICA
a[n_]:= Sum[(1/GCD[n, k])2^s EulerPhi[GCD[n, k]/s], {k, 0, n-1}, {s, Divisors[GCD[n, k]]}];
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jacob A. Siehler, Jun 09 2010
EXTENSIONS
More terms from Robert G. Wilson v, Jun 10 2010
STATUS
approved