|
| |
|
| A304572型 |
| 行读取的三角形：如果k不除n^e、正非零整数和gcd（n，k）>1，则T（n，k）=1。 |
|
2
|
|
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
(列表；桌子；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1
|
|
|
评论
|
n素数和n≤6的行n只包含零；所有其他行至少有一个1。
对于k素数，T（n，k）=0。
|
|
|
链接
|
|
|
|
例子
|
表格开始：
0;
0, 0;
0, 0, 0;
0, 0, 0, 0;
0, 0, 0, 0, 0;
0, 0, 0, 0, 0, 0;
0, 0, 0, 0, 0, 0, 0;
0, 0, 0, 0, 0, 1, 0, 0;
0, 0, 0, 0, 0, 1, 0, 0, 0;
0, 0, 0, 0, 0, 1, 0, 0, 0, 0;
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0;
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0;
...
|
|
|
数学
|
表[Array[Boole[And[PowerMod[n，Floor@Log2@n，#]！=0，GCD[n，#]>1]]&，n]，{n，13}]//压扁
（*第二个程序：上面PNG图像中的行扩展数据：首先，下载PNG并将其保存为“a304572.PNG”，提供2669205个术语：*）
MapIndexed[Take[#1，First@#2]&，ImageData@ColorNegate@Import[“a304572.png”，“png”]](*迈克尔·德弗利格，2018年7月2日*）
|
|
|
黄体脂酮素
|
（PARI）T（n，k）=｛my（r=vecprod（因子（k）[，1]））；n%r&&gcd（n，k）<>1｝\\安德鲁·霍罗伊德2018年11月8日
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
状态
|
已批准
|
| |
|
|
