A096327 Prime(p^2) where p = prime(n).

7, 23, 97, 227, 661, 1009, 1879, 2437, 3803, 6481, 7573, 11321, 14327, 15877, 19471, 25469, 32429, 34849, 42943, 49037, 52121, 62081, 69401, 80929, 97879, 107053, 111863, 121631, 126719, 137143, 177589, 189913, 209569, 216481, 251969, 259547

Offset

1,1

Links

Table of n, a(n) for n=1..36.

Example

5^2=25, prime(25) = 97.

Mathematica

Prime[Prime[Range[40]]^2] (* Harvey P. Dale, Aug 22 2011 *)

Prog

(PARI) g(n, m) = forprime(j=2, m, forprime(x=2, n, print1(prime(j^2)", "); break))

Crossrefs

Sequence in context: A063793 A217233 A316734 * A267805 A154113 A340889

Adjacent sequences: A096324 A096325 A096326 * A096328 A096329 A096330

Keyword

nonn

Author

Cino Hilliard, Aug 02 2004

Extensions

Edited by Robert G. Wilson v, Aug 07 2004

Status

approved