%I#14 2022年5月6日13:12:16
%S 1,2,2,7,19,33,71168471776155731406415134382924068778192896,
%电话:317016634037126810025363355073278101489202030813840671616,
%电话:8159147016413402433207322667938131214200459563090573668
%N a(N)=a(1)+a(2)+…+对于n>=4,a(n-1)+a(m),其中m=2*n-2-2^(p+1),p是唯一的整数,使得2^p<n-1<=2^(p+1),从a(1)=1和a(2)=a(3)=2开始。
%p s:=proc(n)选项记忆`如果`(n<1,0,a(n)+s(n-1));结束进程:
%p a:=proc(n)选项记忆`如果`(n<4,[1,2,2][n],s(n-1)+a(-2^ceil(log[2](n-1))+2*n-2));结束进程:
%p序列(a(n),n=1。。40); # _Petros Hadjicostas,2020年4月23日
%Y参见A049906(类似,但带有-a(m/2))、A049907(类似,但是带有-a。
%K nonn公司
%O 1,2号机组
%百灵鸟金伯利_
%E名称由_Petros Hadjicostas编辑,2020年4月23日
|