%I#11 2020年3月4日20:19:21
%S 0,1,0,1,2,0,2,2,1,1,0,2,3,1,2,3,2,2,1,1,0,2,2,3,3,4,0,2,1,3,2,4,3,
%温度1,0,2,3,1,2,2,3,12,0,3,2,2,1,1,3,3,2,2,2,2,2,1,3,2,3,2,3,
%U 3,2,2,1,3,2,2,1,1,0,2,3,4,4,5,1,2,2,3,3,4,1,3,3,1,2,4,3,2,4,1,2,3,1,3,12,3,2,0
%N A231713的下三角区;按行读取的三角表:T(n,k)=n和k的阶乘基表示(A007623)中数字差的绝对值之和,其中(n,k)=(0,0),(1,0),(1,1),(2,0),(2,1),(2,2)。。。,n>=0和(0<=k<=n)。
%H Antti Karttunen,<a href=“/A231714/b231714.txt”>三角形的n=0..120行,展平</a>
%F a(n)=A231713(A003056(n),A002262(n))。[作为一个序列,这是通过从数组A231713中提取一个子段来获得的。]
%F T(n,0)=A034968(n)。[最左边的一列]
%F每个条目T(n,k)>=A230417(n,k)。
%e这个三角表的开头是:
%e 0;
%e 1,0;
%e 1、2、0;
%e 2,1,1,0;
%e 2、3、1、2、0;
%e 3、2、2、1、1、0;
%e 1、2、2、3、3、4、0;
%e 2,1,3,2,4,3,1,0;
%e。。。
%e有关如何计算术语的示例,请参见A231713。
%o(方案)
%o(定义(A231714 n)(A231813bi(A003056 n)(A002262 n))
%o(定义(A231713bi x y)(let loop((x x)(y y)(i 2)(d 0))(cond(和(零?x)(零?y))d)(其他(loop(floor->exact(/x i))(floor->exact)(/y i)))(+i 1)(+d(abs(-(module x i)(moduleo y i)
%Y最左边的列:A034968。
%Y这是对称方阵A231713的下三角或等效上三角分区。参见A230417。
%K nonn,基础,表
%0、5
%2013年11月12日,安蒂·卡图内
|