A096328 Prime(p^3) where p = prime(n).
19, 103, 691, 2309, 10957, 19403, 47657, 69031, 130073, 279431, 347707, 620531, 867677, 1013609, 1353887, 1999121, 2829503, 3152099, 4268039, 5145347, 5628457, 7258871, 8510507, 10651117, 14042671, 15986303, 17023271, 19235537, 20411623, 22909613, 33289481
Offset: 1
Keywords
Examples
5 = prime(3). Hence, a(3) = prime(5^3) = prime(125) = 691. 7 = prime(4). Hence, a(4) = prime(7^3) = prime(343) = 2309.
Links
- T. D. Noe, Table of n, a(n) for n = 1..100
Crossrefs
Cf. A222759.
Programs
-
Mathematica
Table[ Prime[ Prime[n]^3], {n, 29}] (* Robert G. Wilson v, Aug 07 2004 *)
-
PARI
g(n,m) = forprime(j=2,m, forprime(x=2,n,print1(prime(j^3)",");break))
Extensions
Edited by Robert G. Wilson v, Aug 07 2004