A111045 Numbers n such that P(4n) is prime, where P(m) is the number of partitions of m.
1, 9, 33, 42, 47, 53, 54, 110, 324, 534, 627, 642, 683, 728, 792, 1114, 2112, 2228, 2323, 2770, 3007, 3255, 3368, 3760, 4062, 4569, 6139, 7650, 7939, 8138, 8310, 8493, 8674, 9122, 9407, 10345, 11127, 13343, 14713, 15442, 15632, 16358, 16904, 18165, 19303
Offset: 1
Keywords
Examples
If n=110 then P(4*n) = 74878248419470886233 (prime).
Links
- Max Alekseyev, Table of n, a(n) for n = 1..1271
Crossrefs
Programs
-
Mathematica
Select[ Range[19923], PrimeQ[ PartitionsP[4# ]] &] (* Robert G. Wilson v *)
-
PARI
is(n)=isprime(numbpart(4*n)) \\ Charles R Greathouse IV, Feb 17 2017
Extensions
a(9)-a(37) from Robert G. Wilson v, Nov 14 2005