A341870 Number of partitions of n into 6 distinct and relatively prime parts.

1, 1, 2, 3, 5, 7, 11, 14, 20, 26, 35, 44, 58, 71, 90, 110, 136, 163, 199, 235, 282, 330, 391, 453, 532, 610, 709, 808, 931, 1052, 1206, 1353, 1540, 1718, 1945, 2158, 2432, 2682, 3009, 3305, 3692, 4035, 4493, 4891, 5427, 5883, 6510, 7033, 7758, 8352, 9192, 9862, 10829, 11584, 12687, 13539

Offset

21,3

Links

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

Formula

G.f.: Sum_{k>=1} mu(k)* x^(21*k) / Product_{j=1..6} (1 - x^(j*k)).

Mathematica

nmax = 76; CoefficientList[Series[Sum[MoebiusMu[k] x^(21 k)/Product[1 - x^(j k), {j, 1, 6}], {k, 1, nmax}], {x, 0, nmax}], x] // Drop[#, 21] &

Crossrefs

Cf. A023022, A023026, A023031, A078374, A101271, A339672, A340719, A341868, A341912, A341913, A341914.

Sequence in context: A319471 A218506 A238659 * A234666 A026812 A001402

Adjacent sequences: A341867 A341868 A341869 * A341871 A341872 A341873

Keyword

nonn

Author

Ilya Gutkovskiy, Feb 23 2021

Status

approved