%I#36 2021年8月3日15:01:21
%S 1,3,1,9,5,1,30,21,8,1112,88,47,12,1463387253,97,17,120951816,
%电话:1345675184,23,1102799123730444181641324,30,15426748971,
%电话:4119328396132763645536,38,1306298279855243152183615102244362237473842,47,1
%行读取的N三角形T(N,p):p在长度N的限制增长函数中的出现次数。
%这里使用的RG函数定义为f(1)=1,f(j)<=1+max_{i<j}f(i)。
%C T(n,p)是[n].-的所有集合分区中第p个子集中的元素数_Joerg Arndt_,2016年3月14日
%H Alois P.Heinz,行n=1..141,扁平</a>
%F T(n,n)=1。
%F猜想:当n>1时,T(n,n-1)=2+n*(n-1)/2。
%F猜想:当n>1时,T(n+1,n-1)=2+n*(n+1)*(3*n^2-5*n+26)/24。
%F和{k=1..n}k*T(n,k)=A346772(n).-_阿洛伊斯·海因茨,2021年8月3日
%e长度2的两个限制增长函数是(1,1)和(1,2)。1出现3次,2出现1次,因此T(2,1)=3,T(2,2)=1。
%e 1;
%e 3、1;
%e 9,5,1;
%e 30,21,8,1;
%e 112,88,47,12,1;
%e 463387253,97,17,1;
%电子邮箱:209518161345675184,23,1;
%电子102799123730444181641324,30,1;
%电子邮箱:54267489714119328396132763645536,38,1;
%电子邮箱:306298279855243152183615102244362237473842,47,1;
%e 18383201695902150652112119377098933475190223143031267,57,1;
%电子116778671085687997999547823722357958892965654995191207186258201839,68,1;
%p b:=proc(n,m)选项记忆`如果`(n=0,[1,0],则添加((p->
%p[p[1],p[2]+p[1]*x^j])(b(n-1,最大值(m,j)),j=1..m+1))
%p端:
%pT:=n->(p->seq(系数(p,x,i),i=1..n))(b(n,0)[2]):
%p序列(T(n),n=0..12);#_Alois P.Heinz,2016年3月14日
%tb[n_,m_]:=b[n,m]=如果[n==0,{1,0},和[Function[p,{p[[1],p[2]]+p[[1]]*x^j}][b[n-1,Max[m,j]],{j,1,m+1}]];
%t t[n_]:=函数[p,表[系数[p,x,i],{i,1,n}][b[n,0][2];表[T[n],{n,0,12}]//扁平(*_Jean-François Alcover_,2016年4月7日,在_Alois P.Heinz_*之后)
%Y参考A070071(行总和)。
%Y柱p=1-10给出:A124427、A270494、A270995、A270996、A2704.97、A274998、A270449、A270500、A270501和A270502。
%Y T(2n+1,n+1)给出A270529。
%Y参考A000110、A185105、A285362、A286416、A346772。
%K nonn,表
%O 1,2号机组
%A R.J.Mathar_,2016年3月13日
|