%我#8 2018年8月19日13:22:44
%S 1,0,0,1,1,2,3,4,7,9,14,21,32,45,69103153224338007461107,
%电话:1645244736525413805211983426500394475758587240129772,
%电话:1930012870344272701463504894500140491020896333107864626706875533
%具有一个原子和N个位置的级数减少的自由纯非手性多函数。
%C A系列减少的自由纯非手性多功能(SRAM)是(情况1)叶符号“o”,或(情况2)形式h[g,…,g]的非空非酉表达式,其中h和g是SRAM。SRAM中的位置数是括号[…]的数量加上o的数量。
%H Andrew Howroyd,n的表,n=1..500的a(n)</a>
%F a(1)=1;a(n>1)=求和{0<k<n-1}a(k)*Sum{d|(n-k-1),d<n-k-1}a(d)。
%e a(10)=7 SRAM:
%e o[o[o,o],o[o,o]
%e o[o,o][o,o]
%e o[o,o]
%e o[o,o,o]
%e o[o,o,o]
%e o[o,o,o
%e o[o,o,o
%t a[n_]:=如果[n==1,1,总和[a[k]*总和[a[d],{d,最大[Divisors[n-k-1]]}],{k,n-2}]];
%t数组[a,12]
%o(PARI)seq(n)={my(p=o(x));对于(n=1,n,p=x+p*x*总和(k=2,n-2,subst(p+o(x^(n\k+1)),x,x^k))+o(x*x^n));Vec(p)}\\ Andrew Howroyd_,2018年8月19日
%o(PARI)seq(n)={my(v=向量(n));v[1]=1;对于(n=2,#v,v[n]=sum(i=1,n-2,v[i]*sumdiv(n-i-1,d,if(d<n-i-1),v[d],0));v}\\ Andrew Howroyd_,2018年8月19日
%Y参见A001003、A001678、A002033、A003238、A052893、A053492、A067824、A167865、A214577、A317853、A317875。
%Y参见A317882、A317883、A317884。
%K nonn公司
%O 1,7
%A _Gus Wiseman_,2018年8月9日
%E 2018年8月19日_Andrew Howroyd_第a(17)条及以后条款
|