%I#13 2020年8月29日02:47:25

%S 1,1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,1,1,1,11,1,1,1，

%T 1,1,2,1,1,1,1,1-1,1,1,2,1,1,1-1,1,1,1,1,1,1,1,1,1,1,1,1,1,1，1,1,1,1，

%U 1,1,1,1,1,1,1,1,1,3,1,1,11,1,1,1_1,1,1,1、1,1、1,1,1、1,1、1,3,2,1,1,1,1-1,1、

%N通过下降反对偶读取的平方数组，其中A（N，k）=楼层（A337472（N，k）/A337470（N，克））；A337470（n，k）丰度指数下降。

%C数组由n>=0和k>=1的反对偶降序读取，范围如下：。。。

%H Antti Karttunen，n表，n=0..10584的a（n）；数组的前145个反对偶</a>

%H<a href=“/index/Pri#prime_indices”>根据素因式分解中的索引计算出的序列的索引项</a>

%H<a href=“/index/Pri#primorial_numbers”>为与基本数相关的序列索引条目</a>

%H<a href=“/index/Si#SIGMAN”>与sigma（n）相关序列的索引条目</a>

%F A（n，k）=楼层（A337472（n，k）/A37470（n，k））。

%e数组的左上角开始为：

%电子邮箱| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 19 20 21 22 23

%e（电子）----|----------------------------------------------------------------------

%e 0|1，1，2，1，2,2,1,1,2,2,2,2,3,3,3,1,3,2,3,3，

%e 1 | 1，1，1，

%e 2|1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，2，

%e 3|1，1，1，1,1,1,1,1，1,1，1，

%e 4|1，1，1，1,1,1,1,1，1,1，1，

%e 5|1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，1，

%e等。

%e A337474给出了每列到该列第一个1的距离，对于第1、2、4、8、16……列，该距离为0。。。，其中1已经在顶行中。

%o（PARI）

%o up_to=105858-1；\\或105-1。

%o A337473sq（n，k）=如果（1==k，k，my（f=系数（k），h=#f~，prevpid=素数（f[h，1]），e=f[h、2]，p，s=1）；对于步骤（i=h-1,0，-1，如果（！i，pid=0，pid=primepi（f[i，1]））；对于步进（j=prevpid，（1+pid），-1，p=prime（j+n）；s*=（（p^（1+e）-1）/（p^1）*（p^e）））；if（！pid，返回（楼层））；prevpid=pid；e+=f[i，2]）；楼层）；

%o A337473list（up_to）={my（v=向量（1+up_to，i=0）；对于（a=0，oo，对于（b=1，a，i++；如果（i>#v，返回（v））；v[i]=A337473 sq（b-1，（a-（b-1））））；（v）；}；

%o v337473=A337473列表（up_to）；

%o A337473（n）=v337473[1+n]；

%Y参见A003961、A108951、A337470、A33747、A3374.74、A337466。

%K nonn，表

%0、4

%2020年8月28日，安提·卡图内