%I#28 2022年9月8日08:45:45

%S 1，-2,0，-2,2,0,2,0,1,2，-2,2,0,0，-2,0，-4,2,0.0，-2,0,2，-2,2,0,2，

%T 2,0,0，-2,2，-2,4,0,0，

%U 2，-2,0，-2,4,0,0,0-0，-2.2,0,0，-2，2,0,4，-2

%N 1+2*Sum_{N>=1}（-q）^N*（1+q^2）*（1+q^4）*的展开式*（1+q^（2*k-2））/（1-q）*（1-q^3）**（1-q^（2*n-1））

%C（-1）^n*a（n）是Z[sqrt（2）]中范数8*n-1的不等元数。

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

%H Daniel Corson、David Favero、Kate Liesinger、Sarah Zubairy，<a href=“https://doi.org/10.1016/j.jnt.2004.03.002“>q中的字符和q序列（sqrt（2））</a>，《数论杂志》，107（2004），392-405。

%H Jeremy Lovejoy，<a href=“https://doi.org/10.1016/j.jnt.2003.12.014“>超划分与实二次域，《数论》，106（2004），178-186。

%t具有[{m=80}，系数列表[Series[1+2*Sum[（-q）^n*QPochhammer[q^4，q^4]*QPochammer[q^（2*n+1），q]/（（1+q^，2*n））*QPoch hammer[q^（4*n+4），q^4]*QPochohammer[q，q]），{n，1，m}]，{q，0，m}，q]]（*_G.C.Greubel_，2018年12月4日*）

%o（PARI）m=80；我的（q='q+O（'q^m））；Vec（1+2*总和（n=1，m，（-q）^n/（1+q^（2*n）））*prod（k=1，n，（1-q^

%o（岩浆）m:=80；R<q>：=PowerSeriesRing（整数（），m）；[1] cat系数（R！（2*（&+[（（-q）^n/（1+q^（2*n）））*（&*[（1-q^（4*k））/（（1-q^（2*k））*（1-q^（2*k-1）））：在[1.n]]中的k）：在[1.m]]中的n）））；//_G.C.Greubel，2018年12月4日

%o（鼠尾草）

%o来自sage.combinat.q_analogues import q_pochhammer

%o预压力=80

%o R=PowerSeriesRing（ZZ，'x'）

%o x=R.发电机（）。O（前c）

%o s=1+2*总和（（-x）^n*q_pochhammer（n，x^4，x ^4）/

%o打印（s.系数（））#_G.C.Greubel_，2018年12月4日

%K符号

%0、2

%A _Jeremy Lovejoy，2009年6月12日