A230285 a(n) = n*prime(prime(n)) - prime(n).

1, 7, 28, 61, 144, 233, 396, 517, 724, 1061, 1366, 1847, 2286, 2631, 3118, 3803, 4650, 5033, 6222, 6989, 7634, 8743, 9830, 10975, 12628, 14121, 15098, 16329, 17262, 18397, 21852, 23517, 25372, 26959, 29916, 31421, 33846, 36583, 38482, 41067, 43404, 45473

Offset

1,2

Comments

First published at Sequence Fans Mailing List on Oct 12 2013.

Links

James Spahlinger, Table of n, a(n) for n = 1..10000

Formula

a(n) = A080697(n) - A000040(n). - Omar E. Pol, Oct 21 2013

Mathematica

Table[n*Prime[Prime[n]] - Prime[n], {n, 1, 100}]

Prog

(PARI) a(n) = n*prime(prime(n)) - prime(n) \\ Charles R Greathouse IV, Oct 15 2013

Crossrefs

Cf. A000040, A230098.

Sequence in context: A078307 A045551 A024844 * A033582 A176362 A358999

Adjacent sequences: A230282 A230283 A230284 * A230286 A230287 A230288

Keyword

nonn

Author

V.J. Pohjola, Oct 15 2013

Status

approved