%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