Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A074327
Smaller of twin primes arising in A074326.
1
3, 311, 1619, 3671, 1742537, 148948139, 2777105129, 16149760533341, 10082409897709157
OFFSET
1,1
FORMULA
a(n) = prime(m) where m=2^x and prime(m+1)-prime(m) = 2.
a(n) = A033844(A074326(n)). - Michel Marcus, Aug 28 2019
EXAMPLE
8th term in A074326 is 39, so prime[549755813888]=16149760533341=a(8) and 16149760533343 is the larger twin.
MATHEMATICA
s=0; Do[s=Prime[1+2^n]-Prime[2^n]; If[s==2, Print[Prime[2^n]]], {n, 1, 40}]
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Labos Elemer, Aug 21 2002
EXTENSIONS
Corrected and extended by Michel Marcus, Aug 28 2019
STATUS
approved