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

1, 6, 22, 28, 31, 36, 61, 83, 91, 181, 216, 263, 356, 417, 418, 428, 528, 557, 777, 1133, 1243, 1408, 2170, 2708, 3046, 3867, 5100, 5540, 5662, 7418, 9397, 12110, 12797, 14787, 16161, 16482, 18022, 19431, 19667, 21180, 22011, 22720, 23560, 27903

Offset

1,2

Links

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

Example

If n=91 then p(6n) = 27833079238879849385687 (prime).

Mathematica

Select[ Range[33333], PrimeQ[ PartitionsP[6# ]] &] (* Robert G. Wilson v *)

Prog

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

Crossrefs

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

Sequence in context: A095411 A242592 A044448 * A055709 A276795 A037204

Adjacent sequences: A111033 A111034 A111035 * A111037 A111038 A111039

Keyword

nonn

Author

Parthasarathy Nambi, Nov 11 2005

Extensions

a(10)-a(45) from Robert G. Wilson v, Nov 14 2005

Status

approved