A346937 a(n) = Sum_{d|n} mu(n/d) * binomial(6*d,d) / (5*d+1).
1, 5, 50, 500, 5480, 62776, 749397, 9203128, 115607259, 1478308780, 19180049927, 251857056364, 3340843549854, 44700484300317, 602574657421585, 8175951649914160, 111572030260242089, 1530312970224714489, 21085148778264281864, 291705220703240850760, 4050527291832419432577
Offset: 1
Keywords
Programs
-
Mathematica
Table[Sum[MoebiusMu[n/d] Binomial[6 d, d]/(5 d + 1), {d, Divisors[n]}], {n, 21}]
Comments