A111210 Primes of the form (2^k - prime(k))/3.

3, 7, 17, 37, 79, 163, 183251937907, 96076792050570491, 27043212804868893898596335047829, 1772303994379887830538409413707125877, 510831846955296286119449009050103061206246374061200369

Offset

1,1

Comments

Corresponding k's are 4, 5, 6, 7, 8, 9, 39, 58, 106, 122, 180, 309, 357, 696, ... - Michel Marcus, Jul 04 2021

Links

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

Mathematica

a = Flatten[Table[If[PrimeQ[(2^n - Prime[n])/3] == True, (2^n - Prime[n])/3, {}], {n, 1, 100}]]
Table[ If[PrimeQ[(2^n - Prime[n])/3], (2^n - Prime[n])/3, {}], {n, 1, 200}]]//Flatten (* Robert G. Wilson v, Oct 31 2005 *)

Crossrefs

Cf. A111209.

Sequence in context: A110930 A026646 A026668 * A033489 A357212 A323583

Adjacent sequences: A111207 A111208 A111209 * A111211 A111212 A111213

Keyword

nonn

Author

Roger L. Bagula, Oct 25 2005

Extensions

a(9)-a(11) from Robert G. Wilson v, Oct 31 2005

Edited by N. J. A. Sloane, Nov 19 2005

Status

approved