login
Odd numbers not of the form 3 + twin prime + twin prime.
1

%I #17 Feb 12 2014 18:18:44

%S 1,3,5,7,97,99,101,403,405,407,517,519,521,787,789,791,907,909,911,

%T 1117,1119,1121,1147,1149,1151,1267,1269,1271,1357,1359,1361,3247,

%U 3249,3251,4207,4209,4211

%N Odd numbers not of the form 3 + twin prime + twin prime.

%H <a href="/index/Go#Goldbach">Index entries for sequences related to Goldbach conjecture</a>

%t tps=Flatten[Select[Partition[Prime[Range[2000]],2,1], Last[#]-First[#]==2&]]; Complement[Range[1,Last[tps],2], Union[Total[#]+3&/@Tuples[tps,{2}]]] (* _Harvey P. Dale_, Apr 01 2011 *)

%Y Essentially A007534 + 3.

%K nonn,nice

%O 1,2

%A _David W. Wilson_

%E No others below 100000. Conjectured to be complete.