OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
Juggling Information Service, Site Swap FAQs
M. Macauley, Braids and Juggling patterns, Thesis (Harvey Mudd College) 2003, equation A1.
EXAMPLE
We have one period 1 (3, the three-ball cascade), three period two (42/24, 51/15 = three-ball shower and 60/06) and twelve period three 3-ball siteswaps (423, 441, 450, 522, 531, 603, 612, 630, 711, 720, 801, 900) (The average of digits is always 3).
MAPLE
[seq(DistSS(p, 3), p=1..60)];
A065179 := proc(n)
add( mobius(n/d)*(4^d-3^d), d=numtheory[divisors](n)) /n ;
end proc:
seq(A065179(n), n=1..30) ; # R. J. Mathar, Aug 05 2015
MATHEMATICA
a[n_] := DivisorSum[n, MoebiusMu[n/#]*(4^# - 3^#)&]/n; Array[a, 25] (* Jean-François Alcover, Mar 06 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Oct 19 2001
STATUS
approved