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,2

Links

Max Alekseyev, Table of n, a(n) for n = 1..1271

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

Crossrefs

Cf. A000041, A046063, A114165, A111389, A111045, A114166, A111036, A114167, A114168, A114169, A114170.

Sequence in context: A177697 A287534 A145849 * A020226 A175440 A280405

Adjacent sequences: A111042 A111043 A111044 * A111046 A111047 A111048

Keyword

nonn

Author

Parthasarathy Nambi, Nov 11 2005

Extensions

a(9)-a(37) from Robert G. Wilson v, Nov 14 2005

Status

approved