A114168 Numbers n such that p(8n) is prime, where p(n) is the number of partitions of n.

21, 27, 55, 162, 267, 321, 364, 396, 557, 1056, 1114, 1385, 1684, 1880, 2031, 3825, 4069, 4155, 4337, 4561, 7721, 7816, 8179, 8452, 9962, 15885, 16871, 17024, 17040, 17670, 22186, 23037, 26782, 31307, 35364, 35442, 38430, 42307

Offset: 1

Author

Robert G. Wilson v, Nov 14 2005

Keywords

• nonn

Links

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

Crossrefs

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

Programs

Mathematica

Select[ Range[25000], PrimeQ[PartitionsP[8# ]] &]

PARI

is(n)=isprime(numbpart(8*n)) \\ Charles R Greathouse IV, Feb 17 2017