%I#6 2012年3月30日18:52:39

%S 0,0,0,1,0,0，0,1,0，2,0,2,0,00,1,2,0,1,0-0,3,3,0,1,0,01,0,1,2,0,4，

%T 0,1,1,1,0,1,0,0,1,1,0，0,0,2,0,2,2,0,02,0,5,1,01,0,01,0，

%U 0,2,0,4,0,1,0,6,0,0,12,0,3,0,5,0,2,2,0,0,0，0,2

%N行读取的三角形：R（N，k）=半素数（N）mod A065516（k），其中A065518是连续半素数之间的差异。

%e三角形从第n=1行开始，第1列<=k<=n为：

%e 0；

%e 0，0；

%e 1，0，0；

%e 0，1，0，2；

%e 0、2、0、2和0；

%e 1,0,0,3,0,3；

%p A001358:=如果n=1，则为proc（n）；如果numtheory[bigomega]（a）=2，则返回a；结束条件：；结束do；结束条件：；结束进程：

%p A065516：=程序（n）A001358（n+1）-A001358（n）；结束进程：

%p A174479：=程序（n，k）A001358（n）修改版A065516（k）；结束进程：

%Y参考A001358，A174433。

%K nonn，简单，tabl

%O 1,10个

%A _Juri-Stepan Gerasimov，2010年11月28日