%我

%S 0,0,0,1,0,1,1,0,1,0,01,0,0、1,0,1,0、0,1,1,0,1,1,1,2,0,0_1,0,0，1,2,0,0，

%温度0,0,0,1,0,2,0,00,1,2,0,3,0,1,3,0,12,0,4,0,0，1,2，

%U 0,4,0,0,1,4,0,1,4,4,0 0,0,10,4,1,4,10,01,4,0，0,1,3,0,5,0,0

%N表示N为模3全等的两个素数之和的次数。

%e22可以用两种方式写成模3的两个同余素数之和：22=5+17（5=17mod3）和22=11+11（加法顺序被忽略）。因此a（22）=2。

%t f[n_]：=模块[{a，d，i}，a={}；u=楼层[n/2]；对于[i=1，i<=u，i++，如果[PrimeQ[i]&&PrimeQ[n-i]&&Mod[i，3]！=Mod[n-i，3]，a=附加[a，{n，i，n-i}]]；a] ；表[长度[f[n]]，{n，1200}]

%Y参见A074169、A078647和A078648。

%K nonn公司

%O 1,22号机组

%A _Joseph L.Pe，2002年12月13日