login
Smaller of twin primes arising in A074326.
1

%I #9 Aug 28 2019 11:46:12

%S 3,311,1619,3671,1742537,148948139,2777105129,16149760533341,

%T 10082409897709157

%N Smaller of twin primes arising in A074326.

%F a(n) = prime(m) where m=2^x and prime(m+1)-prime(m) = 2.

%F a(n) = A033844(A074326(n)). - _Michel Marcus_, Aug 28 2019

%e 8th term in A074326 is 39, so prime[549755813888]=16149760533341=a(8) and 16149760533343 is the larger twin.

%t s=0; Do[s=Prime[1+2^n]-Prime[2^n]; If[s==2, Print[Prime[2^n]]], {n, 1, 40}]

%Y Cf. A051439, A033844, A073798, A000079, A074325, A074326.

%K more,nonn

%O 1,1

%A _Labos Elemer_, Aug 21 2002

%E Corrected and extended by _Michel Marcus_, Aug 28 2019