|
%I #7 Jul 14 2012 05:01:39
%S 2,5,7,43,67,103,157,281,503,641,1451,3061,4597,6553,8179,10357,15541,
%T 34981,78721,209939,524269,1062869,2097131,13436909,25509151,28311529,
%U 63700969,113246183,153054989,516560633,573308903,774840959,805306339
%N Primes of the form 2^i*3^j - (i+j) with i, j >= 0.
%H Vincenzo Librandi, <a href="/A069356/b069356.txt">Table of n, a(n) for n = 1..300</a>
%t Take[ Select[ Union[ Flatten[ Table[2^i*3^j - (i + j), {i, 0, 28}, {j, 0, 18}]]], PrimeQ[ # ] &], 33]
%Y Cf. A069355, A005105, A069358, A069346.
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Mar 18 2002
%E Edited and extended by _Robert G. Wilson v_, May 09 2003
|
