%I#28 2023年1月3日09:22:18

%S 1,1,3,1,6,3,8,1,9,6,12,3,14,8,18,9,20,6,24,12,24,3,31,14,27,8，

%电话：30,18,32,1,36,18,48,9,38,20,42,6,42,24,44,12,54,38,57,31,54,14，

%U 54,27,72,8,60,30,60,18,62,32,72,1,84,36,68,18,72,48,72,9,74,38,93,20,96,42

%N N的奇数除数d和N/d不可被3整除。

%C立方AGMθ函数：a（q）（参见A004016），b（q）。

%D Nathan J.Fine，《基本超几何系列与应用》，美国运通。数学。Soc.，1988年；第86页，等式（33.124）。

%H Amiram Eldar，n的表，a（n）表示n=1..10000</a>

%F c（q）*c（q^2）/9的展开式，其中c（q）是三次AGMθ函数。

%周期6序列[1，2，-2，2，1，-4，…]的F欧拉变换。

%F（eta（q^3）*eta（q ^6））^3/（eta。

%F与a（2^e）=1相乘，a（3^e）=3^e，a（p^e）=（p^（e+1）-1）/（p-1），如果p>3。

%F G.F.A（x）满足0=F（A（x，A（x^2），A（x ^4）），其中F（u，v，w）=v^4-u*w*（u-2*v）*（v-2*w）。

%F G.F.A（x）满足0=F（A（x，A（x^2），A（x ^3），A 30*u1*u2*u6^2。-_迈克尔·索莫斯（Michael Somos），2007年4月18日

%F G.F.：x*产品{k>0}（（1-x^（3*k））*。

%F（2*n）=a（n），a（2*n+1）=A185717（n）。a（3*n）=3*a（n）。a（6*n+5）=6*A098098（n）。

%F G.F.：求和{n=-inf.inf}（-1）^n*x^（3*n+1）/（1-x^。参考A124340.-_彼得·巴拉（Peter Bala），2021年1月6日

%F求和{k=1..n}a（k）~c*n^2，其中c=Pi^2/27=0.3655409…（A291050）.-_阿米拉姆·埃尔达尔，2022年11月17日

%F Dirichlet g.F.：zeta（s）*zeta（s-1）*（1-2^（1-s）-3^（-s）+2^（1-s）*3^（-s））_Amiram Eldar_，2023年1月3日

%e G.f=q+q^2+3*q^3+q^4+6*q^5+3*q*6+8*q^7+q^8+9*q^9+6*qq^10+。。。

%t a[n_]：=如果[n<1，0，Sum[d Mod[d，2]布尔[Mod[n/d，3]>0]，{d，除数@n}]]；（*迈克尔·索莫斯，2014年6月12日*）

%t a[n_]：=级数系数[q（QPochhammer[q^3]QPochharmer[q ^6]）^3/（QPoch hammer[q]QPochammer[q ^2]），{q，0，n}]；（*迈克尔·索莫斯，2014年6月12日*）

%tf[p_，e_]：=其中[p==2，1，p==3，p^e，p>3，（p^（e+1）-1）/（p-1）]；a[1]=1；a[n_]：=倍@@f@@FactorInteger[n]；阵列[a，100]（*_Amiram Eldar_，2020年9月12日*）

%o（PARI）{a（n）=如果（n<1，0，sumdiv（n，d，（d%2）*（n/d%3>0）*d））}；

%o（PARI）{a（n）=局部（a）；如果（n<1，0，n-；a=x*o（x^n）；polceoff（（eta（x^3+a）*eta（x^6+a））^3/（eta；

%o（Sage）A=模块形式（Gamma0（6），2，prec=80）。basis（）；A[1]+A[2]；#_迈克尔·索莫斯（Michael Somos），2014年6月12日

%o（岩浆）A:=基础（模块形式（伽马射线（6），2），80）；A[2]+A[3]；/*_迈克尔·索莫斯（Michael Somos），2014年6月12日*/

%Y参考A004016、A005882、A005928、A098098、A185717、A291050。

%K nonn，多个

%氧1,3

%A _迈克尔·索莫斯，2006年7月30日，2007年4月18日