OFFSET
1,2
MATHEMATICA
Table[(1/(6 n)) Sum[MoebiusMu[n/d] Binomial[6 d, d], {d, Divisors[n]}], {n, 21}]
PROG
(PARI) a(n) = sumdiv(n, d, moebius(n/d)*binomial(6*d, d))/(6*n); \\ Michel Marcus, Jul 24 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jul 24 2021
STATUS
approved