OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MAPLE
a:= n-> (ithprime@@2)(n^2):
seq(a(n), n=1..40); # Alois P. Heinz, Mar 17 2021
MATHEMATICA
Table[Prime[Prime[n^2]], {n, 100}]
PROG
(Magma) [NthPrime(NthPrime(n^2)): n in [1..50]];
(Python)
from sympy import prime
def a(n): return prime(prime(n**2))
print([a(n) for n in range(1, 41)]) # Michael S. Branicky, Mar 17 2021
(PARI) a(n) = prime(prime(n^2)); \\ Michel Marcus, Mar 17 2021
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Oct 13 2012
STATUS
approved