A141217 a(n) = prime(prime(prime(prime(n) - 1) - 1) - 1) - 1, where prime(n) is the n-th prime.

1, 2, 36, 150, 576, 862, 1492, 1810, 2712, 4210, 4512, 6688, 8110, 8572, 9828, 12496, 14778, 15496, 18222, 20856, 21490, 24420, 26416, 29670, 33460, 36832, 38046, 40086, 41452, 43206, 51576, 54366, 57726, 59628, 66552, 67138, 71740, 76386

Offset

1,2

Links

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

Maple

p:=ithprime: seq(p(p(p(p(n)-1)-1)-1)-1, n=1..40); # Emeric Deutsch, Aug 16 2008

Mathematica

Table[Prime[Prime[Prime[Prime[n - 1] - 1] - 1] - 1] - 1, {n, 2, 50}] (* Vincenzo Librandi, Apr 05 2015 *)

Crossrefs

Cf. A141208, A140853, A006093.

Sequence in context: A357445 A227927 A007757 * A206688 A226419 A025531

Adjacent sequences: A141214 A141215 A141216 * A141218 A141219 A141220

Keyword

nonn

Author

Juri-Stepan Gerasimov, Jul 31 2008

Extensions

Corrected and extended by Emeric Deutsch, Aug 16 2008

Status

approved