OFFSET
1,2
COMMENTS
Conjecture: all terms but the first term are multiples of 5. - Harvey P. Dale, Sep 26 2017
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
a(n)=A066388(n)/6.
EXAMPLE
a(1)=1 because 6*1-1=5, 6*1+1=7, 12*1-1=11 and 12*1+1=13 are all twin primes.
MATHEMATICA
Select[Range[31000], AllTrue[Flatten[{6*#+{1, -1}, 12*#+{1, -1}}], PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Sep 26 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, May 10 2010
EXTENSIONS
Corrected (13590 removed, 13655 and 14590 inserted, 22725 replaced by 22825) by R. J. Mathar, May 15 2010
STATUS
approved