A069356 Primes of the form 2^i*3^j - (i+j) with i, j >= 0.

2, 5, 7, 43, 67, 103, 157, 281, 503, 641, 1451, 3061, 4597, 6553, 8179, 10357, 15541, 34981, 78721, 209939, 524269, 1062869, 2097131, 13436909, 25509151, 28311529, 63700969, 113246183, 153054989, 516560633, 573308903, 774840959, 805306339

Offset: 1

Author

Reinhard Zumkeller, Mar 18 2002

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..300 [Corrected by Sean A. Irvine]

Crossrefs

Cf. A069355, A005105, A069358, A069346.

Programs

Mathematica

Take[ Select[ Union[ Flatten[ Table[2^i*3^j - (i + j), {i, 0, 28}, {j, 0, 18}]]], PrimeQ[ # ] &], 33]

Extensions

Edited and extended by Robert G. Wilson v, May 09 2003