A364001 Primes of the form |2^i - 3^j|, i >= 1, j >= 1.

5, 7, 11, 13, 17, 19, 23, 29, 37, 47, 61, 73, 79, 101, 139, 179, 211, 227, 229, 239, 241, 269, 431, 503, 509, 601, 727, 997, 1021, 1163, 1319, 1931, 2039, 2179, 3299, 3853, 4093, 4513, 6529, 6553, 7949, 8111, 11491, 14197, 16141, 16381, 19427, 19681, 32687

Offset: 1

Author

Clark Kimberling, Aug 09 2023

Keywords

• nonn

Crossrefs

Cf. A014121, A192110, A192111, A363998.

Programs

Mathematica

z = 500;
t = Table[Abs[2^i - 3^j], {i, 1, z}, {j, 1, z}];
u = Sort[Flatten[t]];
v = Union[u] ; (* A363999 *)
w = (v - 1)/2 ;  (* A364000 *)
Intersection[v, Prime[Range[200000]]]  (* this sequence *)