|
| |
|
| A206821型 |
| 将{-1,0,1}上的不可约多项式与前导系数1匹配的数字。 |
|
9
|
|
|
|
2, 3, 7, 8, 10, 14, 16, 18, 21, 23, 29, 31, 35, 41, 42, 44, 48, 50, 54, 56, 60, 62, 66, 70, 72, 76, 78, 80, 82, 84, 86, 88, 93, 97, 99, 103, 109, 111, 115, 117, 123, 125, 129, 131, 137, 141, 143, 147, 153, 155, 159, 161, 165, 167, 171, 173, 179, 183, 186, 188
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
系数为{-1,0,1}的一元多项式y（n，x）与正整数集n匹配如下。首先，将系数为{0,1}的一元多项式p（n，x）与n进行匹配，如A206074型; 即多项式x^d（0）+x^dd（n），其中d（i）为0或1，表示0<=i<=n且d（0）=1，与二进制数d（O）d（1）匹配。。。d（n）。然后在多项式p（n，x）中插入至少具有一个负系数的一元多项式，如下所示：x-1位于x和x+1之间，对于k>1，多项式x^k-p（n、x），对于0<n<2^k，位于x^k和x^k+1之间，顺序如下：，。。。，x^k-p（2^k-1，x）。Mathematica部分中的程序按照刚才描述的顺序生成生成的多项式。这里表示为y（n，x）的第n个多项式可以从程序中获得y[[n]]。如果有理数域上不可约，则前11个多项式标记为“是”，如下所示：
n。。。。。y（n，x）。。。不可约的
1 ..... 1 ........ 不
2 ..... x。。。。。。。。对
三。。。。。1+x。。。。。。对
4 ..... x^2。。。。。。不
5 .... -1+x^2。。。。不
6 .... -x+x^2。。。。不
7-1-x+x^2。。对
8 ..... 1+x^2。。。。对
9 ..... x+x^2。。。。不
10。。。。1+x+x^2。。对
11 .... x^3。。。。。。不
...
基于多项式y（n，x）的序列指南：
|
|
|
链接
|
|
|
|
数学
|
t=表格[整数位数[n，2]，{n，1，1000}]；
b[n_]：=反向[表[x^k，{k，0，n}]]；
p[n]：=p[n]=t[[n]].b[-1+长度[t[[n]]]；
表格形式[表格[{n，p[n]，系数[p[n]]}，{n，1，6}]]
f[k_]：=2^k-k；g[k_]：=2^k-2+f[k-1]；
q1[n]：=p[2^（k-1）]-p[n+1-f[k]]；
q2[n]：=p[n-f[k]+2]；
y1=表格[p[n]，{n，1，4}]；
Do[AppendTo[y1，Join[Table[q1[n]，{n，f[k]，g[k]-1}]，
表[q2[n]，{n，g[k]，f[k+1]-1}]]，{k，3，8}]
y=压扁[y1]；（{-1，0，1}上的多项式*）
w={}；Do[n++；If[Inrreducible PolynomialQ[y[[n]]]，AppendTo[w，n]]，{n，200}]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
已批准
|
| |
|
|
