登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A300382型 秩为6的三次模的狄利克雷级数。 1
1, 0, 0, 8, 6, 0, 0, 0, 10, 0, 24, 0, 0, 0, 0, 32, 0, 0, 40, 48, 0, 0, 0, 0, 30, 0, 0, 0, 60, 0, 64, 0, 0, 0, 0, 80, 0, 0, 0, 0, 84, 0, 0, 192, 60, 0, 0, 0, 51, 0, 0, 0, 0, 0, 144, 0, 0, 0, 120, 0, 124, 0, 0, 130, 0, 0, 0, 0, 0, 0, 144, 0, 0, 0, 0, 320, 0, 0, 160, 192, 91, 0, 0, 0, 0, 0, 0, 0, 180, 0, 0, 0, 0, 0, 240, 0, 0, 0, 240, 239, 204, 0, 0, 0, 0, 0, 0, 0, 220, 0, 0, 0, 0, 0, 0, 480, 0, 0, 0, 0, 405 (列表图表参考历史文本内部格式)
偏移
1,4个
评论
作为替代提交A031365号显示故障A031365号(16) =1997年出版的版本中的24。
链接
M.Baake,维数d≤4的重合问题的解,arxiv:math/0605222(2006),(5.12)
MAPLE公司
读取(“转换”):
#(5.10)中1/(1-5^(-s))的展开
L1:=[1,序列(0,i=2..200)]:
从1到k
如果5^k<=nops(L1),则
L1:=底土(5^k=1,L1);
其他的
断裂;
结束条件:;
结束do:
#(5.10)中1/(1-p^(-2s))的乘法
对于我从1 do
p:=ithprime(i);
如果modp(p,5)=2或modp(p,5)=3,则
劳克斯:=[1,seq(0,i=2..200)]:
从1到k
如果p^(2*k)<=nops(Laux),则
劳克斯:=亚磷(p^(2*k)=1,劳克斯);
其他的
断裂;
结束条件:;
结束do:
L1:=DIRICHLET(L1,劳克斯);
结束条件:;
如果p>nops(L1),则
断裂;
结束条件:;
结束do:
#(5.10)中1/(1-p^(-s))^2的乘法
对于我从1 do
p:=ithprime(i);
如果modp(p,5)=1或modp(p,5)=4,则
劳克斯:=[1,seq(0,i=2..200)]:
从1到k
如果p^k<=nops(Laux),则
劳克斯:=亚磷(p^k=k+1,劳克斯);
其他的
断裂;
结束条件:;
结束do:
L1:=DIRICHLET(L1,劳克斯);
结束条件:;
如果p>nops(L1),则
断裂;
结束条件:;
结束do:
#这就是现在的齐塔人A035187号
#打印(L1);
#生成Zeta_L(s-1)
L1shft:=[seq(op(i,L1)*i,i=1..nops(L1))];
#生成1/Zeta_L
L1x:=加法(op(i,L1)*x^(i-1),i=1..nops(L1)):
泰勒(1/L1x,x=0,nops(L1)):
L1i:=gfun[seriestolist](%);
#生成1/Zeta_L(2s)
L1i2:=[1,seq(0,i=2..nops(L1))];
对于k从2到nops(L1i)do
如果k^2<nops(L1i2),则
L1i2:=底土(k^2=op(k,L1i),L1i2);
其他的
断裂;
结束条件:;
结束do:
#生成Zeta_L(s)*Zeta_L(s-1)
DIRICHLET(L1,L1shft);
#生成Zeta_L
L1:=DIRICHLET(%,L1i2);
#生成1/(1+4^(-s))
劳克斯:=[1,seq(0,i=2..nops(L1))]:
从1到k
如果4^k<=nops(Laux),则
劳克斯:=底土(4^k=(-1)^k,劳克斯);
其他的
断裂;
结束条件:;
结束do:
#生成泽塔_L(s)*泽塔_L(s-1)/泽塔_L(2s)/(1+4^(-s))
L1:=DIRICHLET(L1,劳克斯);
#生成1+4^(1-s)
劳克斯:=[1,序列(0,i=2..3),4,序列(0,i=5..nos(L1))];
DIRICHLET(L1,Laux)#R.J.马塔尔2018年3月4日
交叉参考
囊性纤维变性。A031365号.
关键词
非n,较少的
作者
R.J.马塔尔2018年3月4日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月18日22:18 EDT。包含371782个序列。(在oeis4上运行。)