login
A051005
PartitionsQ[ A035359 ], i.e., prime values of PartitionsQ.
3
2, 2, 3, 5, 89, 29927, 444793, 602644050950309, 5907806880101973271193081, 442874899733097781915111718440153
OFFSET
1,1
COMMENTS
The next term is known (see A035359) but is too big to include here.
LINKS
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]] (* Jean-François Alcover, Oct 19 2012 *)
Select[PartitionsQ[Range[2500]], PrimeQ] (* Harvey P. Dale, Aug 11 2015 *)
CROSSREFS
Sequence in context: A376190 A080669 A099205 * A266583 A002163 A093422
KEYWORD
nonn,nice
STATUS
approved