%I#2 2014年2月11日19:05:29

%S 0,0,0,1,0,1,1,1,0,1,1,0,1,1,0,1,1,1,2,0,1,11,0,3,0,11,0,1，

%温度0,4,0,0,1,0,4,1,1,0,5,0,1,0,10,00,05,0,2,0,0,12,0,6,0,1,1,1,0，

%U 1,1,0,6,0,1,1,0,7,0,1,0,8,0,0,0,0,0,0,0,0,0,0,0,0,0,7,0,1,0,8,0,1,1

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

%e18可以用两种方式写成模3的两个不协调素数之和：18=5+13（5=2mod3；13=1mod3）和18=7+11（加法顺序被忽略）。因此a（18）=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参见A078646、A078647和A078648。

%K nonn公司

%O 1,18号

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