A346580 a(n) = (1/(6*n)) * Sum_{d|n} mu(n/d) * binomial(6*d,d).

1, 5, 45, 440, 4750, 54081, 642341, 7861216, 98480286, 1256564750, 16273981757, 213378921432, 2826867619108, 37782552518473, 508840821825750, 6898459208449920, 94070535317459017, 1289430373107917718, 17755914760643605781, 245518560759177014000, 3407586451859019939012

Offset

1,2

Comments

Inverse Euler transform of A002295.

Moebius transform of A261499.

Links

Table of n, a(n) for n=1..21.

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

Cf. A002295, A004355, A008683, A022553, A261499, A346577, A346578, A346579, A346581, A346582.

Sequence in context: A005979 A165225 A121272 * A054318 A093140 A137233

Adjacent sequences: A346577 A346578 A346579 * A346581 A346582 A346583

Keyword

nonn

Author

Ilya Gutkovskiy, Jul 24 2021

Status

approved