A055003 a(n) = prime(prime(n)-1).

2, 3, 7, 13, 29, 37, 53, 61, 79, 107, 113, 151, 173, 181, 199, 239, 271, 281, 317, 349, 359, 397, 421, 457, 503, 541, 557, 577, 593, 613, 701, 733, 769, 787, 857, 863, 911, 953, 983, 1021, 1061, 1069, 1151, 1163, 1193, 1213, 1291, 1399, 1429, 1439, 1459, 1493, 1511, 1583

Offset

1,1

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000

Maple

with(numtheory): [seq(ithprime(ithprime(i)-1), i=1..70)];

Mathematica

Prime[Prime[Range[60]] - 1] (* Paolo Xausa, Sep 13 2025 *)

Prog

(PARI) a(n) = prime(prime(n)-1); \\ Michel Marcus, Aug 08 2017

Crossrefs

Cf. A000040, A008578.

Sequence in context: A074129 A233042 A175248 * A099361 A234003 A233350

Adjacent sequences: A055000 A055001 A055002 * A055004 A055005 A055006

Keyword

nonn

Author

N. J. A. Sloane, Jun 10 2000

Status

approved