OFFSET
1,7
LINKS
T. D. Noe, Table of n, a(n) for n=1..10000
EXAMPLE
a(7)=2 because 14+3 and 14+5 are primes.
MATHEMATICA
For[lst={}; n=1, n<=100, n++, cnt=0; k=1; While[Prime[k]<n, If[PrimeQ[2n+Prime[k]], cnt++ ]; k++ ]; AppendTo[lst, cnt]]; lst
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
T. D. Noe, May 28 2002
STATUS
approved