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.

A078883 Lesser member p of a twin prime pair such that p+1 is 3-smooth.

This page as a plain text file.
%I A078883 #10 Aug 27 2024 09:15:26
%S A078883 3,5,11,17,71,107,191,431,1151,2591,139967,472391,786431,995327,
%T A078883 57395627,63700991,169869311,4076863487,10871635967,2348273369087,
%U A078883 56358560858111,79164837199871,84537841287167,150289495621631,578415690713087,1141260857376767
%N A078883 Lesser member p of a twin prime pair such that p+1 is 3-smooth.
%H A078883 Ray Chandler, <a href="/A078883/b078883.txt">Table of n, a(n) for n = 1..62</a> (terms < 10^1000)
%F A078883 a(n) = A027856(n)-1 = A078884(n)-2.
%e A078883 A000040(20) = 71 and 71+1 = 72 = 2^3*3^2 = A003586(17) and 71+2 = 73 = A000040(21), therefore 71 is a term.
%t A078883 seq[max_] := Select[Sort[Flatten[Table[2^i*3^j - 1, {i, 1, Floor[Log2[max]]}, {j, 0, Floor[Log[3, max/2^i]]}]]], And @@ PrimeQ[# + {0, 2}] &]; seq[2*10^15] (* _Amiram Eldar_, Aug 27 2024 *)
%Y A078883 Cf. A000040, A001359, A014574, A003586, A027856, A078884.
%Y A078883 Apart from initial terms, same as A059960.
%K A078883 nonn
%O A078883 1,1
%A A078883 _Reinhard Zumkeller_, Dec 11 2002