[go: up one dir, main page]

login
A111045
Numbers n such that P(4n) is prime, where P(m) is the number of partitions of m.
14
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,2
LINKS
EXAMPLE
If n=110 then P(4*n) = 74878248419470886233 (prime).
MATHEMATICA
Select[ Range[19923], PrimeQ[ PartitionsP[4# ]] &] (* Robert G. Wilson v *)
PROG
(PARI) is(n)=isprime(numbpart(4*n)) \\ Charles R Greathouse IV, Feb 17 2017
KEYWORD
nonn
AUTHOR
Parthasarathy Nambi, Nov 11 2005
EXTENSIONS
a(9)-a(37) from Robert G. Wilson v, Nov 14 2005
STATUS
approved