PartitionsQ / A046065 extended

[Eric W. Weisstein]

I have found the next largest member of A046065 (number of partitions of n
into distinct parts (A000009[ n ]) is prime)

5, 7, 22, 70, 100, 495, 1247, 2072, 320397

Unfortunately, the actual value PartitionsQ[320397] is too big to add to
A051005 :)

In[1]:= PartitionsQ[320397]
Out[1]= 
106915956409006359018433021105142309296827278461779172221353205379381\
269125192559092210689606003389962486255620066219868051289764137683900550\
701756814910666031118431871257348943702647487128478105065663190986961568\
204739221230812618951383206309040605397010643457227952650700652522936342\
595164824942095952642091249621887869684848761751245449315075576826653829\
164149201824058749087270336471166370305647183443124410498305043717156881\
6032845447939

I was surprised to find 320397, and it seems _very_ unlikely (i.e.,
exponentially small chance) that any more exist.  Thanks to James Sellers
for some additional insight into the Q(n) function
(http://www.treasure-troves.com/math/PartitionFunctionQ.html).

Cheers,
-Eric

--------------------------------------------------------------------
* Eric W. Weisstein                                                *
* Encyclopedist             phone:  217-398-0700 x599              *
* Wolfram Research, Inc.    FAX:    217-398-0747                   *
* 100 Trade Center Drive    e-mail: eww at wolfram.com                *
* Champaign, IL 61820-7237  WWW: www.treasure-troves.com/eric.html *
--------------------------------------------------------------------