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

Links

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

Mathematica

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

Prog

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

Crossrefs

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

Sequence in context: A098898 A098768 A208157 * A103083 A120735 A009727

Adjacent sequences: A114165 A114166 A114167 * A114169 A114170 A114171

Keyword

nonn

Author

Robert G. Wilson v, Nov 14 2005

Status

approved