|
| |
|
| A058213号 |
| φ（x）=2^n（n>=0）解的三角形排列，其中φ=A000010号是欧拉的总方向函数。每行对应一个特定的n，其长度为n+2（对于0<=n<=31），32（对于n>=32）。（这假设只有5个费马素数。） |
|
5
|
|
|
|
1, 2, 3, 4, 6, 5, 8, 10, 12, 15, 16, 20, 24, 30, 17, 32, 34, 40, 48, 60, 51, 64, 68, 80, 96, 102, 120, 85, 128, 136, 160, 170, 192, 204, 240, 255, 256, 272, 320, 340, 384, 408, 480, 510, 257, 512, 514, 544, 640, 680, 768, 816, 960, 1020, 771, 1024, 1028, 1088
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
φ（x）是2的次幂当且仅当x是2的幂乘以不同费马素数的乘积。因此，如果如推测的那样，只有5个费马素数，那么x的奇数部分，即2^32-1的除数，只有32种可能性，如下所示A004729号.
|
|
|
链接
|
|
|
|
例子
|
三角形开始：
{ 1, 2},
{ 3, 4, 6},
{ 5, 8, 10, 12},
{15, 16, 20, 24, 30},
{17, 32, 34, 40, 48, 60},
{51, 64, 68, 80, 96, 102, 120},
{85, 128, 136, 160, 170, 192, 204, 240},
...
|
|
|
数学
|
phiinv[n_，pl_]：=模块[{i，p，e，pe，val}，如果[pl=={}，返回[If[n==1，{1}，{}]]；val={}；p=最后[pl]；对于[e=0；pe=1，e==0||Mod[n，（p-1）pe/p]==0，e++；pe*=p，val=Join[val，pe*phiinv[If[e==0，n，n*p/pe/（p-1）]，Drop[pl，-1]]]；排序[val]]；phiinv[n_]：=phiinv[n，选择[1+除数[n]，素数Q]]；连接@@（phiinv[2^#]&/@Range[0，10]）
|
|
|
交叉参考
|
囊性纤维变性。A000010号,A001317号,A003401号,A004729号,A019434号,A045544号,A047999号,A053576美元,A054432号,A058214美元,A058215号.
|
|
|
关键词
|
非n,标签
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
