%I#7 2013年12月5日19:56:53
%S 1,2,2,3,6,6,3,4,12,24,24,12,8,8,4,5,20,40,40,60120120,60,20,15,30,
%电话:30,15,10,5,6,30,60,60,90180180,9012060720360240240,
%U 120,30,24,48,48,72144144,72,24,18,36,36,18,12,12,6,7,42,84,84126单位
%N如果N=(2^k)-1,a(N)=a((N+1)/2)=k,如果N=2^k,a(N)=a。
%C分形序列。对于范围[1,(2^n)-1]中的k,a(2^n+k)/a(2^n-k)=n+1。每个n>1在序列中出现2*A045778(n)次。
%o(方案:)(定义(A096115 n)(cond((pow2?(+1))(+1(A000523 n)))
%o(定义(功率2?n)(和(>n 0)(零?(A004198bi n(-n 1))))
%A096111的Y置换,即a(n)=A096111(A122199(n)-1)[注意不同的起始偏移]。参见A096113、A052330、A096114和A096116。
%K nonn公司
%O 1,2号机组
%A _Amarnath Murthy,2004年6月30日
%E由_Antti Karttune_编辑、扩展和添加的方案代码,2006年8月25日
|