A062772 Smallest prime larger than square of n-th prime.
5, 11, 29, 53, 127, 173, 293, 367, 541, 853, 967, 1373, 1693, 1861, 2213, 2819, 3491, 3727, 4493, 5051, 5333, 6247, 6899, 7927, 9413, 10211, 10613, 11467, 11887, 12781, 16139, 17167, 18773, 19333, 22229, 22807, 24659, 26573, 27893, 29947, 32051
Offset: 1
Examples
100th prime, 541 immediately follows 529, square of 9th prime.
Links
- Harry J. Smith, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A007491. - Zak Seidov, Apr 30 2015
Programs
-
Maple
with(numtheory): [seq(nextprime(ithprime(w)^2),w=1..100)];
-
Mathematica
Array[NextPrime[Prime[#]^2] &, 41] (* Michael De Vlieger, Nov 02 2017 *)
-
PARI
a(n) = { nextprime(prime(n)^2) } \\ Harry J. Smith, Aug 10 2009
Comments