A228529 a(n) = prime(n*prime(n)).
3, 13, 47, 107, 257, 397, 653, 881, 1279, 1889, 2293, 3119, 3847, 4423, 5323, 6563, 7937, 8819, 10391, 11833, 12889, 14831, 16477, 18713, 21599, 23603, 25189, 27409, 29063, 31511, 37159, 39869, 43321, 45589, 50923, 53281, 57271, 61561, 65173, 69821, 74383
Offset: 1
Keywords
Examples
For n = 2, prime(2*prime(2)) = prime(2*3) = prime(6) = 13, so a(2) = 13.
Crossrefs
Programs
-
Mathematica
Table[Prime[n*Prime[n]], {n, 100}] (* T. D. Noe, Oct 22 2013 *)
-
PARI
a(n) = prime(n*prime(n)); \\ Michel Marcus, Oct 22 2013