%I#22 2022年1月26日12:05:16
%S 1,2,3,3,4,4,4,5,5,4,5,5,1,6,6,5,6,7,7,6,6,5,5,7,8,8,7,5,8,9,8,7,
%T 6,6,9,10,10,9,9,8,7,7,6,10,11,10,10,10,9,8,18,7,11,12,11,10,9,
%U 9,8,6,6,12,13,13,12,12,11,10,10,9,7,7,13
%N行索引,其中N出现在A183079中。
%C A183079被视为扁平序列,是自然数的排列,所以对于每个n,在A18307S中正好存在一行包含n的行。
%C在这个序列中,每个n>=2总共发生2^(n-2)次_Antti Karttunen,2015年5月18日
%H Reinhard Zumkeller(前250个术语)和Antti Karttunen,n表,n(n)表示n=1..10440</a>
%F a(n)=1+A029837(A220347(n))=A070941(A220347-1(n)-1)_Antti Karttunen,2015年5月18日
%t(*b是A220347*)b[n_]:=b[n]=带[{r=(-1+Sqrt[8n+1])/2},其中[n<=1,n,IntegerQ[r],2b[楼层[Sqrt[2n]+1/2]]-1,True,2b[n-楼层[r]]];
%t a[n_]:=1+整数长度[b[n]-1,2];
%t数组[a,100](*_Jean-François Alcover_,2021年12月5日*)
%o(哈斯克尔)
%o导入数据。列表(findIndex)
%o导入数据。也许(来自Just)
%o a220348 n=来自Just(findIndex(elem n)a183079_tabf)+1
%o(方案,两种变体)
%o(定义(A220348 n)(+1(A029837(A220347 n)))
%o(定义(A220348 n)(A070941(+-1(A220347 n)))
%o_Antti Karttunen_,2015年5月18日
%Y参考A029837、A070941、A183079、A220347。
%K非n
%O 1,2号机组
%A _Reinhard Zumkeller,2012年12月12日
%E Name由Michel Marcus编辑,2022年1月26日
|