搜索： 编号：a004016
|
| |
|
|
A004016号
|
| 平面六角晶格A_2的Theta系列。
（原名M4042）
|
|
+0
311
|
|
|
|
1, 6, 0, 6, 6, 0, 0, 12, 0, 6, 0, 0, 6, 12, 0, 0, 6, 0, 0, 12, 0, 12, 0, 0, 0, 6, 0, 6, 12, 0, 0, 12, 0, 0, 0, 0, 6, 12, 0, 12, 0, 0, 0, 12, 0, 0, 0, 0, 6, 18, 0, 0, 12, 0, 0, 0, 0, 12, 0, 0, 0, 12, 0, 12, 6, 0, 0, 12, 0, 0, 0, 0, 0, 12, 0, 6, 12, 0, 0, 12, 0
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
六角形晶格是常见的二维晶格，其中每个点都有6个邻居。这有时被称为三角晶格。
a（n）是x^2+x*y+y^2=n（或等价的x^2-x*y+y^2=n）的整数解的数目-迈克尔·索莫斯2004年9月20日
a（n）是x^2+y^2+z^2=2*n的整数解数，其中x+y+z=0-迈克尔·索莫斯2012年3月12日
|
|
|
参考文献
|
B.C.Berndt，《拉马努詹的笔记第四部分》，施普林格出版社，见第171页，第28条。
哈维·科恩，《高级数论》，多佛出版公司，1980年，第89页。例18。
J.H.Conway和N.J.A.Sloane，“球形填料、晶格和群”，Springer-Verlag，第111页。
M.N.Huxley，面积，格点和指数和，牛津，1996；第236页。
N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。
|
|
|
链接
|
J.M.Borwein和P.B.Borwein，雅各比身份和年度股东大会的立方对应物，变速器。阿默尔。数学。Soc.，323（1991），第2期，691-701。MR1010408（91e:33012）见第695页。
克里斯蒂安·卡塞尔（Christian Kassel）和克里斯托夫·鲁特诺（Christophe Reutenauer），二维环面上n点的Hilbert格式的zeta函数，arXiv:1505.07229v3[math.AG]，2015年。[请注意，这篇论文的后一版本有不同的标题和内容，论文的数字理论部分被移到了列表中的下一个出版物上。]
小池正雄，非紧算术三角群上的模形式，未出版手稿【N.J.A.Sloane用OEIS A-numbers广泛注释，2021年2月14日。我在第一页写的是2005年，但内部证据表明是1997年。]
N.J.A.斯隆，球面填料和球面代码表，IEEE传输。信息理论，第IT-27卷，1981年，第327-338页。
|
|
|
配方奶粉
|
a（q）的q次幂展开式，其中a（q）是第一个三次AGMθ函数。
theta_3（q）*theta_3（q^3）+theta_2（q）*theta_2（q^3）的q次幂展开。
φ（x）*phi（x^3）+4*x*psi（x^2）*psi（x^6）的x次幂展开式，其中phi（）、psi（）是Ramanujan theta函数。
（1/Pi）积分{0..Pi/2}θ_3（z，q）^3+θ_4（z，q）^3 dz的幂展开式-迈克尔·索莫斯2012年1月1日
系数x^0在f（x*q，q/x）^3中以q^2的幂展开，其中f（，）是Ramanujan的广义θ函数-迈克尔·索莫斯2012年1月1日
G.f.A（x）满足0=f（A（x），A（x^2），A（x^4）），其中f（u，v，w）=u^2-3*v^2-2*u*w+4*w^2-迈克尔·索莫斯2004年6月11日
G.f.A（x）满足0=f（A（x”），A（x^2），A“x^3”，A“x^6”），其中f（u1，u2，u3，u6）=（u1-u3）*（u3-u6）-（u2-u6）^2-迈克尔·索莫斯2005年5月20日
G.f.是周期1傅里叶级数，满足f（-1/（3t））=3^（1/2）（t/i）f（t），其中q=exp（2Pi it）-迈克尔·索莫斯2007年9月11日
G.f.A（x）从拉马努扬（Ramanujan）出发，满足A（x）+A（-x）=2*A（x^4）。
一般公式：1+6*Sum_{k>0}x^k/（1+x^k+x^（2*k））-迈克尔·索莫斯2003年10月6日
G.f.：总和_（q^（n^2+n*m+m^2）），其中总和（对于n和m）延伸到整数上-乔格·阿恩特2011年7月20日
通用公式：θ_3（q）*θ_3（q^3）+θ_2（q）*theta_2（q^2）=（eta（q^（1/3））^3+3*eta（q ^3）^3）/eta（q）。
一般公式：1+6*Sum_{n>=1}x^（3*n-2）/（1-x^-保罗·D·汉纳2011年7月3日
渐近平均值：极限{m->oo}（1/m）*Sum_{k=1..m}a（k）=2*Pi/sqrt（3）=3.627598(A186706号)-阿米拉姆·埃尔达尔2022年10月15日
|
|
|
例子
|
G.f.=1+6*x+6*x^3+6*x^4+12*x^7+6*x|9+6*x*12+12*x^13+6*x*16+。。。
最小范数为2:
1+6*q^2+6*q^6+6*q ^8+12*q ^ 14+6*q^18+6*q ^ 24+12*q^ 26+6*q^32+12*q^38+12*q ^42+6*q ^ 50+6*q ^54+12*q^56+12*^128+12*q^134+12*q ^146+6*q ^150+12*q ^152+12*q^158+。。。
|
|
|
MAPLE公司
|
局部a，j；
对于从0到n/3的j do
结束do：
a；
结束进程：
|
|
|
数学
|
a[n_]：=如果[n<1，Boole[n==0]，6除数和[n，KroneckerSymbol[#，3]&]]；(*迈克尔·索莫斯2011年11月8日*）
a[n_]：=系列系数[（QPochhammer[q]^3+9 q QPochhammer[q^9]^3）/QPochhammer[q^3]，{q，0，n}]；(*迈克尔·索莫斯2014年11月13日*）
a[n_]：=系列系数[EllipticTheta[3，0，q]椭圆Theta[3,0，q^3]+椭圆Theta[2,0，q]椭圆Theta[2,0、q^3]，{q，0，n}]；(*迈克尔·索莫斯2014年11月13日*）
a[n_]：=长度@FindInstance[x^2+xy+y^2==n，{x，y}，整数，10^9]；(*迈克尔·索莫斯2015年9月14日*）
术语=81；f[q_]=LatticeData[“A2”，“ThetaSeriesFunction”][-I Log[q]/Pi]；s=级数[f[q]，{q，0，2项}]；系数列表[s，q^2][[1；；项]](*Jean-François Alcover公司2017年7月4日*）
|
|
|
黄体脂酮素
|
（PARI）{a（n）=my（a，p，e）；如果（n<1，n==0，a=因子（n）；6*prod（k=1，矩阵大小（a）[1]，[p，e]=a[k，]；如果（p==3，1，p%3==1，e+1，1-e%2））}/*迈克尔·索莫斯，2005年5月20日*//*编者注：这是最有效的程序*/
（PARI）{a（n）=如果（n<0，0，polceoff（1+6*和（k=1，n，x^k/（1+x^k+x^（2*k）），x*O（x^n）），n））}/*迈克尔·索莫斯2003年10月6日*/
（PARI）{a（n）=如果（n<1，n==0，6*sumdiv（n，d，kronecker（d，3）））}/*迈克尔·索莫斯2005年3月16日*/
（PARI）{a（n）=如果（n<1，n==0，6*sumdiv（n，d，（d%3==1）-（d%3==2））}/*迈克尔·索莫斯2005年5月20日*/
（PARI）{a（n）=我的（a）；如果（n<0，0，n*=3；a=x*O（x^n）；波尔科夫（（eta（x+a）^3+3*x*eta（x^9+a））^3）/eta（x^3+a），n））}/*迈克尔·索莫斯2005年5月20日*/
（PARI）{a（n）=如果（n<1，n==0，qfrep（[2，1；1，2]，n，1）[n]*2）}/*迈克尔·索莫斯2005年7月16日*/
（PARI）{a（n）=如果（n<0，0，polcoeff（1+6*和（k=1，n，x^（3*k-2）/（1-x^/*保罗·D·汉纳2011年7月3日*/
（Sage）模块形式（Gamma1（3），1，prec=81）.0#迈克尔·索莫斯2013年6月4日
（岩浆）基础（模块形式（Gamma1（3），1），81）[1]/*迈克尔·索莫斯2014年5月27日*/
（岩浆）L:=晶格（“A”，2）；A<q>：=ThetaSeries（L，161）；A/*迈克尔·索莫斯2014年11月13日*/
（Python）
从数学导入prod
来自症状输入因子
定义A004016号（n） ：如果p%3==1，则返回6*prod（e+1）；如果p！=3） 如果n其他1#柴华武，2022年11月17日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,美好的,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.006秒内完成
|
