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

%S 1,2,4,9,13,22,27,39,47,61,71,91100122137160175205220253272，

%电话：304326368386427455497523575598651683733768830856918，

%电话：959102110561129162136128113471393

%N a（N）=T（N，N-1），数组T如A049790中所示。

%H G.C.Greubel，n的表格，n=2..1000的a（n）</a>

%p seq（`if`（n=2,1，加上（楼层（n-1）/楼层（n-2）/j），j=1..n-2）），n=2..60）；#_G.C.Greubel，2019年12月10日

%t表[如果[n==2，1，总和[楼层[（n-1）/楼层[（n-2）/j]]，{j，n-2}]，{n，2,60}]（*_G.C.Greubel_，2019年12月10日*）

%o（PARI）a（n）=如果（n==2，1，总和（j=1，n-2，（n-1）\（n-2）\j））；

%o向量（60，n，a（n+1））\\_G.C.Greubel_，2019年12月10日

%o（岩浆）[n eq 2选择1其他（&+[楼层（（n-1）/楼层（（n-2）/j））：[1..n-2]中的j）：[2..60]]中的n；//_G.C.Greubel，2019年12月10日

%o（鼠尾草）

%o定义a（n）：

%o如果（n==2）：返回1

%o else：（1..n-2）中j的返回值（下限（n-1）/下限（（n-2）/j））

%o【a（n）代表n in（2..60）】#_G.C.格鲁贝尔，2019年12月10日

%o（间隙）

%o a:=函数（n）

%o如果n=2，则返回1；

%o else返回Sum（[1..n-2]，j->Int（（n-1）/Int（（n-2）/j））；

%o fi；结束；

%o列表（[2..60]，n->a（n））；#_G.C.Greubel，2019年12月10日

%Y请参阅A049790、A049791、A04979、A0497、A04975、A04976。

%K nonn公司

%氧2,2

%百灵鸟金伯利_