A280271 Expansion of (1/(1 - x))*Product_{k>=1} (1 + x^prime(k)).

1, 1, 2, 3, 3, 5, 5, 7, 8, 9, 11, 12, 14, 16, 18, 20, 23, 25, 29, 32, 36, 40, 44, 49, 54, 59, 65, 70, 76, 83, 89, 98, 105, 114, 123, 132, 143, 154, 165, 178, 190, 204, 219, 234, 251, 267, 285, 304, 324, 345, 368, 390, 415, 441, 468, 498, 527, 559, 591, 626, 663, 702, 742, 784, 828, 873, 923, 973, 1026, 1081, 1138

Offset

0,3

Comments

Partial sums of A000586.

Links

Table of n, a(n) for n=0..70.

Joerg Arndt, Matters Computational (The Fxtbook), end of section 16.4.2 "Partitions into distinct parts", pp.348ff

Eric Weisstein's World of Mathematics, Prime Partition

Index entries for related partition-counting sequences

Formula

G.f.: (1/(1 - x))*Product_{k>=1} (1 + x^prime(k)).

Mathematica

nmax = 70; CoefficientList[Series[(1/(1 - x)) Product[(1 + x^Prime[k]), {k, 1, nmax}], {x, 0, nmax}], x]

Crossrefs

Cf. A000070, A000586, A034891, A036469.

Sequence in context: A159050 A363433 A210336 * A145834 A339246 A341142

Adjacent sequences: A280268 A280269 A280270 * A280272 A280273 A280274

Keyword

nonn

Author

Ilya Gutkovskiy, Dec 30 2016

Status

approved