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

11, 24, 75, 78, 94, 105, 155, 211, 293, 416, 506, 666, 1860, 3013, 3508, 3811, 4869, 5615, 5710, 8824, 8841, 8998, 10380, 11014, 11779, 13795, 14276, 15285, 18014, 19456, 19855, 22435, 23343, 23391, 26328, 30608, 31380, 32074, 32810, 33459

Offset: 1

Author

Robert G. Wilson v, Nov 14 2005

Keywords

• nonn

Links

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

Crossrefs

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

Programs

Mathematica

Select[ Range[28571], PrimeQ[PartitionsP[7# ]] &]

PARI

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