%I#12 2022年9月8日08:44:58

%S 0,0,1,1,6,3,14,12,21,51,21,62,69,79,63136,90181129160186324，

%电话：16026430637129751228552844447628768372715820980652，

%电话：107970211731002115172896014171292

%N a（N）=和{k=1..N}T（N，k），数组T如A049783所示。

%H G.C.Greubel，<a href=“/A049984/b049784.txt”>n，a（n）表，n=1..1000</a>

%p seq（添加（添加（`mod`（n，楼层（k/j）），j=1..k），k=1..n），n=1..60）；#_G.C.Greubel，2019年12月12日

%t表[Sum[Sum[模式[n，楼层[k/j]]，{j，k}]，{k，n}]，}n，60}]（*_G.C.格鲁贝尔，2019年12月12日*）

%o（PARI）a（n）=总和（k=1，n，总和（j=1，k，升力（Mod（n，k\j）））；

%o矢量（60，n，a（n））\\_G.C.Greubel_，2019年12月12日

%o（岩浆）[+[（&+[（n mod Floor（k/j））：j in[1..k]]）：k in[1..n]]：n in[1.60]]；//_G.C.Greubel，2019年12月12日

%o（Sage）[sum（j in（1..k）的总和（n%下限（k/j）），k in（1..n）的总和），n in（1..60）的总和]#_G.C.Greubel_，2019年12月12日

%o（GAP）列表（[1..60]，n->总和（[1..n]，k->总和（[1]..k]，j->n mod Int（k/j））；#_G.C.Greubel，2019年12月12日

%A049783的Y行总和。

%Y参考A049785、A049786、A049787、A049788、A049789。

%K nonn公司

%O 1,5型

%百灵鸟金伯利_