OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Table[Prime[Prime[n]]^2, {n, 50}] (* Vincenzo Librandi, May 26 2016 *)
PROG
(PARI) a(n) = prime(prime(n))^2 \\ Michel Marcus, Jun 30 2013
(Magma) [NthPrime(NthPrime(n))^2: n in [1..40]]; // Vincenzo Librandi, May 26 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jorge Coveiro, Apr 14 2004
STATUS
approved