A074327 Smaller of twin primes arising in A074326.
3, 311, 1619, 3671, 1742537, 148948139, 2777105129, 16149760533341, 10082409897709157
Offset: 1
Examples
8th term in A074326 is 39, so prime[549755813888]=16149760533341=a(8) and 16149760533343 is the larger twin.
Programs
-
Mathematica
s=0; Do[s=Prime[1+2^n]-Prime[2^n]; If[s==2, Print[Prime[2^n]]], {n, 1, 40}]
Formula
a(n) = prime(m) where m=2^x and prime(m+1)-prime(m) = 2.
Extensions
Corrected and extended by Michel Marcus, Aug 28 2019