A346925 a(n) = Sum_{d|n} mu(n/d) * binomial(3*d,d) / (2*d+1).

1, 2, 11, 52, 272, 1414, 7751, 43208, 246663, 1430440, 8414639, 50065628, 300830571, 1822758766, 11124755380, 68328711696, 422030545334, 2619630794574, 16332922290299, 102240108466928, 642312451209982, 4048514835624478, 25594403741131679, 162250237951706584

Offset

1,2

Comments

Moebius transform of A001764.

Links

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

Mathematica

Table[Sum[MoebiusMu[n/d] Binomial[3 d, d]/(2 d + 1), {d, Divisors[n]}], {n, 24}]

Prog

(PARI) a(n) = sumdiv(n, d, moebius(n/d)*binomial(3*d, d)/(2*d+1)); \\ Michel Marcus, Aug 07 2021

Crossrefs

Cf. A001764, A002996, A008683.

Sequence in context: A110308 A027201 A026933 * A052171 A333542 A168022

Adjacent sequences: A346922 A346923 A346924 * A346926 A346927 A346928

Keyword

nonn

Author

Ilya Gutkovskiy, Aug 07 2021

Status

approved