OFFSET
1,1
COMMENTS
The values of f(a(n)) (given in A066286) appear to be divisible by 6, except the first two.
LINKS
Gilmar Rodriguez Pierluissi, Table of n, a(n) for n = 1..64 (terms 1..50 from Jon Perry, Robert G. Wilson and Dean Hickerson, terms 51..55 from Gilmar Rodriguez Pierluissi, terms 56..63 from Robert G. Wilson v)
EXAMPLE
4 = 2+2; the gap is 0. 6=3+3 (0). 8=3+5; the gap is 2, and this is the largest gap to date, so 8 is in the sequence.
10=5+5 (0), 12=5+7 (2), 14=7+7 (0), 16=5+11 (6), so 16 is in the sequence.
MATHEMATICA
f[n_] := For[p=n/2, True, p--, If[PrimeQ[p]&&PrimeQ[n-p], Return[n-2p]]]; For[n=4; max=-1, True, n+=2, If[f[n]>max, Print[n]; max=f[n]]]
CROSSREFS
KEYWORD
nonn,nice
AUTHOR
Jon Perry, Dec 09 2001
EXTENSIONS
More terms from Robert G. Wilson v and Dean Hickerson, Dec 10 2001
Changed offset to 1 (this is a list). - N. J. A. Sloane, Sep 07 2013
STATUS
approved