

A051005


PartitionsQ[ A035359 ], i.e., prime values of PartitionsQ.


2




OFFSET

1,1


COMMENTS

The next term is known (see A035359) but is too big to include here.


LINKS

Table of n, a(n) for n=1..10.
Eric Weisstein's World of Mathematics, Partition Function Q Congruences.
Eric Weisstein's World of Mathematics, Partition Function Q


MATHEMATICA

Reap[For[n = 1, n <= 2500, n++, If[PrimeQ[q = PartitionsQ[n]], Print["n = ", n, " Q = ", q]; Sow[q]]]][[2, 1]] (* JeanFrançois Alcover, Oct 19 2012 *)
Select[PartitionsQ[Range[2500]], PrimeQ] (* Harvey P. Dale, Aug 11 2015 *)


CROSSREFS

Cf. A000009, A035359.
Sequence in context: A228162 A080669 A099205 * A266583 A002163 A093422
Adjacent sequences: A051002 A051003 A051004 * A051006 A051007 A051008


KEYWORD

nonn,nice


AUTHOR

Eric W. Weisstein


STATUS

approved



