This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A364001 #10 Sep 04 2023 12:46:22 %S A364001 5,7,11,13,17,19,23,29,37,47,61,73,79,101,139,179,211,227,229,239,241, %T A364001 269,431,503,509,601,727,997,1021,1163,1319,1931,2039,2179,3299,3853, %U A364001 4093,4513,6529,6553,7949,8111,11491,14197,16141,16381,19427,19681,32687 %N A364001 Primes of the form |2^i - 3^j|, i >= 1, j >= 1. %t A364001 z = 500; %t A364001 t = Table[Abs[2^i - 3^j], {i, 1, z}, {j, 1, z}]; %t A364001 u = Sort[Flatten[t]]; %t A364001 v = Union[u] ; (* A363999 *) %t A364001 w = (v - 1)/2 ; (* A364000 *) %t A364001 Intersection[v, Prime[Range[200000]]] (* this sequence *) %Y A364001 Cf. A014121, A192110, A192111, A363998. %K A364001 nonn %O A364001 1,1 %A A364001 _Clark Kimberling_, Aug 09 2023