OFFSET
1,1
COMMENTS
For n > 1, the n-1 first primes determine the primes up to a(n). This is how the Sieve of Eratosthenes works. - Jean-Christophe Hervé, Oct 21 2013
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = Max[prime q: q < prime(n)^2].
MAPLE
seq(prevprime(ithprime(i)^2), i=1..100); # Robert Israel, May 04 2020
MATHEMATICA
NextPrime[Prime[Range[50]]^2, -1] (* Harvey P. Dale, May 19 2016 *)
PROG
(PARI) a(n) = precprime(prime(n)^2); \\ Michel Marcus, Dec 13 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, May 05 2000
STATUS
approved