%I#12 2023年10月20日06:46:43

%S 0,0,0,1,1,0，-1，-2，-3,0,0，1,3,6，-1，-1，-2-，-5，-11,0,1,2,3,5,10,21，

%温度0,0，-1，-3，-6，-11，-21，-42，1,1,1,2,5,11,22,43,85,0，-1,2，-3，-5，-10，-21，

%U-43、-86、-171、0、1、3、6、11、21、42、85171342、-1、-1、-1、-2、-5、-11、-22、-43、-85、-170、-341、-683、1、2、3、5、10、21、43、86171134116821365

%反对偶读取N数组T（N，k）：A131531第N个差值的第k项。

%C该数组包含对角线0中的A131708（0），然后对角线1中的-A024495（0..1），对角线2中的A024493（0..2），然后是-A131708（0..3），再然后是A024495（0..4），最后是-A024493（0..5）。

%F T（0，k）=A131531（k）。T（n，k）=T（n-1，k+1）-T（n-1，k），n>0。

%F T（n，n）=A001045（n）。T（n，n+1）=-A001045（n）。T（n，n+2）=A078008（n）。

%F T（n，0）=-T（n，3）=（-1）^（n+1）*A024495（n）。

%F T（n，1）=（-1）^（n+1）*A131708（n）。

%F T（n，2）=（-1）^n*A024493（n）。

%F T（n，k+6）=T（n，k）。

%F a（n）=A131708（0），-A024495（0,1），A024493（0,1,2），-A131708（0,12,3），A02.4495（0,1.2,3,4），-A0204493（0,1.2，3,5）。

%e表格从n=0行开始，k列>=0为：

%e 0，0，1，0，0

%e 0，1，-1，0，-1，1，0，1

%e 1，-2，1，-1，2，-1，1，-2，1，-1，2，-1，1，-2，1，-1，2，-1，1，-2 A131556

%电子-3、3、-2、3、-3、2、-3、3，-2、3，-3、2，-3、3

%e第6、-5、5、-6、5、-5、6、-5，5、-6，5、-5，6，-5，5，-6，5，-5

%电子-11、10、-11、11、-10、11、-11

%e 21、-21、22、-21

%p A131531：=程序（n）操作（（n模块6）+1，[0,0,1,0,0，-1]）；结束进程：

%p A167613:=proc（n，k）选项记忆；如果n=0，则A131531（k）；else进程名（n-1，k+1）-进程名（n-1，k）；结束条件：；结束程序：#R.J.Mathar，2010年12月17日

%t nmax=13；

%t A131531=表格[{0，0，1，0，-1}，{nmax}]//扁平化；

%t t[n_]：=t[n]=差异[A131531，n]；

%t t[n_，k_]：=t[n][[k]]；

%t表[t[n-k，k]，{n，1，nmax}，{k，n，1和-1}]//扁平（*Jean-François Alcover_，2023年10月20日*）

%Y参见A167617（反对角线总和）。

%K tabl，简单，签名

%0、9

%A Paul Curtz，2009年11月7日