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

1, 3, 21, 136, 968, 7059, 53819, 420592, 3362238, 27342916, 225568797, 1882926144, 15875338989, 134993712777, 1156393242330, 9969937070688, 86445222719723, 753310719641286, 6594154339031799, 57956002304003096, 511238042454487704, 4524678117713613419, 40166643855158315819

Offset: 1

Author

Ilya Gutkovskiy, Aug 08 2021

Keywords

• nonn

Comments

Moebius transform of A002293.

Crossrefs

Cf. A002293, A002996, A008683, A346925, A346936, A346937, A346938, A346939.

Programs

Mathematica

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