OFFSET
1,8
COMMENTS
Conjecture: If n>200 is not among 211, 226, 541, 701, then a(n)>0.
This essentially follows from the conjecture related to A219157, since n=x+y for some positive integers x and y with 6x-1,6x+1,6y-1,6y+1 all prime if and only if 6n=p+q for some twin prime pairs {p,p-2} and {q,q+2}.
Similarly, the conjecture related to A218867 implies that any integer n>491 can be written as x+y (0<x<=y<n) with 6x+1, 6x+5, 6y+1 and 6y+5 all prime; and the conjecture related to A219055 implies that any integer n>1600 not among 2729 and 4006 can be written as x+y (0<x<=y<n) with 2x-3, 2x+3, 2y-3 and 2y+3 all prime.
LINKS
Zhi-Wei Sun, Table of n, a(n) for n = 1..20000
Zhi-Wei Sun, Conjectures involving primes and quadratic forms, arXiv:1211.1588.
EXAMPLE
a(9)=1 since 9=2+7 with 6*2-1, 6*2+1, 6*7-1 and 6*7+1 all prime.
MATHEMATICA
a[n_]:=a[n]=Sum[If[PrimeQ[6k-1]==True&&PrimeQ[6k+1]==True&&PrimeQ[6(n-k)-1]==True&&PrimeQ[6(n-k)+1]==True, 1, 0], {k, 1, (n-1)/2}]
Do[Print[n, " ", a[n]], {n, 1, 100}]
PROG
(PARI) a(n)=sum(x=1, (n-1)\2, isprime(6*x-1)&&isprime(6*x+1)&&isprime(6*n-6*x-1)&&isprime(6*n-6*x+1)) \\ Charles R Greathouse IV, Feb 28 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Zhi-Wei Sun, Jan 03 2013
STATUS
approved