A051143 Numbers k such that the k-th prime is a partition number.
1, 2, 3, 4, 5, 26, 2061, 702993, 307058572, 3350187739, 9088200428, 43794115173, 51932790219, 378210209388, 521301342188, 297064987225918, 19677201507658441, 437852535314831447, 1673669998972800207, 29252504332047744188, 42842701894337201916
Offset: 1
Links
Programs
-
Mathematica
PrimePi@Select[PartitionsP@Range@301, PrimeQ@# &] (* Robert G. Wilson v, Nov 14 2005 *)
Extensions
a(16)-a(21) using Kim Walisch's primecount, from Amiram Eldar, Jul 26 2019