login
A346581
a(n) = (1/(7*n)) * Sum_{d|n} mu(n/d) * binomial(7*d,d).
5
1, 6, 63, 728, 9275, 124866, 1753073, 25365600, 375677595, 5667202850, 86775157139, 1345153422600, 21069043965983, 332927798516614, 5301031234076325, 84967018610221440, 1369846562874360886, 22199151535757655354, 361411377745122110421, 5908312923789590118600
OFFSET
1,2
COMMENTS
Inverse Euler transform of A002296.
Moebius transform of A261500.
MATHEMATICA
Table[(1/(7 n)) Sum[MoebiusMu[n/d] Binomial[7 d, d], {d, Divisors[n]}], {n, 20}]
PROG
(PARI) a(n) = sumdiv(n, d, moebius(n/d)*binomial(7*d, d))/(7*n); \\ Michel Marcus, Jul 24 2021
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jul 24 2021
STATUS
approved