OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
1, seq(ithprime(2*numtheory:-pi(n)), n=2..100); # Robert Israel, Oct 07 2024
PROG
(PARI) a(n) = my(k=1, nb=primepi(n)); while(primepi(k) != 2*nb, k++); k; \\ Michel Marcus, Nov 25 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Aug 16 2002
EXTENSIONS
More terms from Jason Earls, Aug 22 2002
STATUS
approved