cp's OEIS Frontend

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.

A370523 Numbers k > 2 such that all positive values of k - 2^(2^m) are prime, with integer m >= 0.

This page as a plain text file.
%I A370523 #29 Mar 19 2024 12:41:39
%S A370523 4,7,9,15,21,33,45,63,75,105,153,183,195,243,273,285,435,525,573,603,
%T A370523 813,825,1065,1233,1305,1623,2145,2595,2715,2805,3375,3465,3933,4023,
%U A370523 4245,4275,4653,4803,4935,5655,6303,6705,7563,8865,10095,10503,10863,12165,12243,12825,13713,13725,14013
%N A370523 Numbers k > 2 such that all positive values of k - 2^(2^m) are prime, with integer m >= 0.
%C A370523 If k > 4 is a term of this sequence, then (k-2, k-4) is a twin prime pair.
%C A370523 So all terms k > 7 are divisible by 3, and k = 7 is the only prime here.
%C A370523 It seems that there are infinitely many such numbers.
%C A370523 Note that A039669 is finite and probably complete.
%e A370523 The number 15 is a term, since 15-2^(2^0) and 15-2^(2^1) are primes 13 and 11.
%t A370523 q[k_] := Module[{m = 0}, While[2^(2^m) < k && PrimeQ[k - 2^(2^m)], m++]; 2^(2^m) >= k]; Select[Range[4, 15000], q] (* _Amiram Eldar_, Feb 22 2024 *)
%Y A370523 Cf. A039669, A129613.
%K A370523 nonn
%O A370523 1,1
%A A370523 _Thomas Ordowski_, Feb 22 2024
%E A370523 More terms from _Amiram Eldar_, Feb 22 2024