OFFSET
1,1
COMMENTS
All primes + 2 are terms of this sequence. Is 12 the last even term? - Frank Ellermann, Jan 17 2002
A048974, A052147, A067187 and A088685 are very similar after dropping terms less than 13. - Eric W. Weisstein, Oct 10 2003
Values of n such that A061358(n)=1. - Emeric Deutsch, Apr 03 2006
EXAMPLE
4 is a term as 4 = 2+2, 15 is a term as 15 = 13+2.
MAPLE
g:=sum(sum(x^(ithprime(i)+ithprime(j)), i=1..j), j=1..80): gser:=series(g, x=0, 280): a:=proc(n) if coeff(gser, x^n)=1 then n else fi end: seq(a(n), n=1..272); # Emeric Deutsch, Apr 03 2006
MATHEMATICA
cQ[n_]:=Module[{c=0}, Do[If[PrimeQ[n-i]&&PrimeQ[i], c++], {i, 2, n/2}]; c==1]; Select[Range[4, 271], cQ[#]&] (* Jayanta Basu, May 22 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Jan 10 2002
EXTENSIONS
Edited by Frank Ellermann, Jan 17 2002
STATUS
approved