OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Giovanni Resta)
EXAMPLE
6*2*3*5*7*11*13-1=180179 prime, 180179+2=180181 twin prime of 180179, so n(1)=1.
MATHEMATICA
PrimePi[Part[#, 1, 1] & /@ FactorInteger /@ Select[Times @@@ Partition[ Prime[Range[5 10^4]], 6, 1], PrimeQ[6 # + 1] && PrimeQ[6 # - 1] &]] (* Giovanni Resta, Sep 16 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Pierre CAMI, Apr 09 2007
EXTENSIONS
More terms from Giovanni Resta, Sep 16 2019
STATUS
approved