OFFSET
1,8
EXAMPLE
Pairs (p,q) of successive primes with p+q<=27: {(2,3), (3,5), (5,7), (7,11), (11,13)}, hence a(27)=5.
MATHEMATICA
With[{t=Total/@Partition[Prime[Range[100]], 2, 1]}, Table[Count[t, _?(#<=n&)], {n, 100}]] (* Harvey P. Dale, Apr 16 2015 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Oct 14 2002
STATUS
approved