A058697 P(p(n)), P = primes (A000040), p = partition numbers (A000041).

2, 2, 3, 5, 11, 17, 31, 47, 79, 113, 181, 263, 389, 547, 761, 1049, 1453, 1951, 2659, 3511, 4643, 6073, 7933, 10243, 13249, 16981, 21713, 27551, 34841, 43853, 55147, 68863, 85819, 106397, 131779, 162473, 199889, 245039, 300233, 365513

Offset

0,1

Comments

Prime number whose index is the n-th partition number. - Omar E. Pol, Aug 05 2011

Links

Harvey P. Dale, Table of n, a(n) for n = 0..100

Formula

a(n) = A000040(A000041(n)). - Omar E. Pol, Aug 05 2011

Mathematica

Prime[PartitionsP[Range[0, 40]]] (* Harvey P. Dale, Sep 21 2014 *)

Prog

(PARI) a(n)={prime(numbpart(n))} \\ Andrew Howroyd, Dec 28 2017

Crossrefs

Cf. A058698.

Sequence in context: A249241 A089540 A080008 * A030427 A049907 A078445

Adjacent sequences: A058694 A058695 A058696 * A058698 A058699 A058700

Keyword

nonn

Author

N. J. A. Sloane, Dec 31 2000

Status

approved