[go: up one dir, main page]

login
A122139
Primes from A122136 corresponding to the indices A122138.
3
2, 13, 19, 29, 29, 79, 47, 73, 163, 359, 5233, 20477, 811, 13859, 2203, 75997, 3331, 4457, 239087, 58061, 159097, 116041, 7487, 17929, 4547, 152657, 408787, 58313, 5563, 4783, 226199, 13729, 676763, 204641, 119293, 283979, 2210983, 7121, 433
OFFSET
1,1
FORMULA
a(n) = A122136(A122138(n)).
MATHEMATICA
Select[Table[Numerator[Sum[Prime[k]^2, {k, 1, n}]/Product[Prime[k], {k, 1, n}]], {n, 1, 200}], PrimeQ[ #1]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Alexander Adamchuk, Aug 21 2006
STATUS
approved