%I#22 2018年8月8日04:34:08
%S 1,0,1,0,2,1,0,0,2,1,0,2,2,1,0,10,0,1,2,2,2,1,2,0,02,2,2,2,0,2,2,
%温度2,1,0,0,0,1,2,2,2,1,0,1,0,0-0,02,2,2,2,2,2,2,1,2,0,0:0,0,2,2,2
%N按行读取三角形,保留1作为A101688的最右边对角线,并将所有其他1替换为2。
%C行总和=重复的奇数整数:(1,1,3,3,5,…)。
%C三角形的特征序列=A168314:(1,1,3,5,13,29,71,165,401,…)。
%H Boris Putievskiy,<a href=“https://arxiv.org/abs/1212.2732“>整数序列和配对函数的变换,arXiv:1212.2732[math.CO],2012。
%F按行读取三角形,保留1作为A101688的最右侧对角线,并将所有其他1替换为2。
%F From _Boris Putievskiy_,2013年1月9日:(开始)
%F a(n)=2*A101688(n)-A023531(n)。
%F a(n)=2*层((2*A002260(n)+1)/(A003056(n)+3))*A00226(n)-A023531(n)。
%F a(n)=2*楼层((2*n-t*(t+1)+1)/(t+3))*(n-t*,t+1)/2)-楼层((sqrt(8*n+1)-1)/2)+t,其中t=楼层((-1+sqrt,8*n-7))/2)。(结束)
%e三角形的前几行=
%e 1;
%e 0,1;
%e 0、2、1;
%e 0,0,2,1;
%e 0,0,2,2,1;
%e 0,0,0,2,2,1;
%e 0、0、0,2、2、2和1;
%e 0、0、0,0、2、2、1;
%e 0、0、0和2、2、2和1;
%e 0,0,0;
%e 0,0,0、0、0,2、2、2,2、1;
%e 0,0,0;
%e。。。
%t行=11;
%t A=数组[其中[#1==1,1,#1<=#2,2,True,0]&,{rows,rows}];
%t表[A[[i-j+1,j]],{i,1,rows},{j,1,i}]//压扁(*_Jean-François Alcover_,2018年8月8日*)
%Y参考A101688、A168314、A16831
%K nonn,表
%O 1,5型
%A _加里·W·亚当森,2009年11月22日
|