OFFSET
1,5
COMMENTS
LINKS
Zhi-Wei Sun, Table of n, a(n) for n = 1..10000
EXAMPLE
a(14) = 1 since 14 = 10 + 4 with p(3, 10) + p(6, 4) = 83 prime.
a(38) = 1 since 38 = 31 + 7 with p(3, 31) + p (6, 7) = 587 prime.
MATHEMATICA
p[m_, x_]:=(m-2)x(x-1)/2+x
a[n_]:=Sum[If[PrimeQ[p[3, x]+p[6, n-x]], 1, 0], {x, 1, n-1}]
Table[a[n], {n, 1, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zhi-Wei Sun, Nov 10 2013
STATUS
approved