A364000 Numbers of the form |2^i - 3^j - 1|/2, i >= 1, j >= 1.
0, 2, 3, 5, 6, 8, 9, 11, 12, 14, 18, 23, 24, 27, 30, 32, 36, 38, 39, 50, 57, 59, 62, 69, 87, 89, 105, 108, 113, 114, 117, 119, 120, 123, 126, 134, 147, 215, 236, 242, 251, 254, 300, 332, 348, 356, 360, 362, 363, 390, 471, 498, 507, 510, 581, 659, 815, 837
Offset: 1
Keywords
Crossrefs
Cf. A363999.
Programs
-
Mathematica
t = Table[Abs[2^i - 3^j], {i, 1, 30}, {j, 1, 30}]; v = Union[Sort[Flatten[t]]] ; (* A363999 *) (v - 1)/2; (* this sequence *)