OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
MATHEMATICA
Accumulate[Select[Prime[Range[100]], !PrimeQ[#-2]&&!PrimeQ[#+2]&]] (* Harvey P. Dale, Feb 08 2011 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Dec 27 2008
STATUS
approved