A092769 Squares of A006450: a(n) = prime(prime(n))^2.
9, 25, 121, 289, 961, 1681, 3481, 4489, 6889, 11881, 16129, 24649, 32041, 36481, 44521, 58081, 76729, 80089, 109561, 124609, 134689, 160801, 185761, 212521, 259081, 299209, 316969, 344569, 358801, 380689, 502681, 546121, 597529, 635209
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A006450.
Programs
-
Magma
[NthPrime(NthPrime(n))^2: n in [1..40]]; // Vincenzo Librandi, May 26 2016
-
Mathematica
Table[Prime[Prime[n]]^2, {n, 50}] (* Vincenzo Librandi, May 26 2016 *)
-
PARI
a(n) = prime(prime(n))^2 \\ Michel Marcus, Jun 30 2013