OFFSET
2,30
COMMENTS
LINKS
Eric Weisstein's World of Mathematics, Cluster Primes
EXAMPLE
a(25)=1 because Prime[25]=97 and there is 1 even number, 88, that cannot be written as the difference of two odd primes less than or equal to 97.
MATHEMATICA
m=10000; n=PrimePi[m]-1; p=Table[Prime[i+1], {i, n}]; d=Table[0, {m/2}]; c=Table[0, {n}]; For[i=2, i<=n, i++, For[j=1, j<i, j++, diff=p[[i]]-p[[j]]; d[[diff/2]]++ ]; c[[i]]=Count[Take[d, (p[[i]]-3)/2], 0]]; c
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
T. D. Noe, Jul 15 2002, Nov 19 2006
STATUS
approved