搜索： a275314-编号：a275311
|
| |
| |
|
|
|
0, 2, 3, 3, 5, 2, 7, 2, 5, 1, 11, 5, 13, 4, 7, 5, 17, 1, 19, 7, 6, 4, 23, 1, 6, 5, 7, 6, 29, 4, 31, 1, 13, 6, 11, 7, 37, 8, 7, 4, 41, 3, 43, 13, 6, 8, 47, 7, 13, 3, 19, 7, 53, 4, 7, 3, 11, 9, 59, 6, 61, 16, 11, 7, 17, 5, 67, 19, 20, 4, 71, 4, 73, 17, 11, 11
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,2
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
数学
|
gradus[n_]：=1+加号@@（（第一个[#]-1）*最后一个[#]&&@FactorInteger[n]）；a[n_]：=EulerPhi[（g=梯度[n]）]-MoebiusMu[g]；数组[a，76](*阿米拉姆·埃尔达尔2019年11月3日*）
|
|
|
黄体脂酮素
|
（PARI）g（n）=我的（f=系数（n））；和（k=1，#f~，（f[k，1]-1）*f[k、2]）+1\\A275314型
a（n）=我的（gn=g（n））；欧勒菲（gn）-莫比乌斯（gn\\米歇尔·马库斯2019年11月4日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
1, 2, 3, 4, 6, 8, 5, 9, 12, 16, 10, 18, 24, 32, 7, 15, 20, 27, 36, 48, 64, 14, 30, 40, 54, 72, 96, 128, 21, 25, 28, 45, 60, 80, 81, 108, 144, 192, 256, 42, 50, 56, 90, 120, 160, 162, 216, 288, 384, 512, 11, 35, 63, 75, 84, 100, 112, 135, 180, 240, 243, 320, 324, 432, 576, 768, 1024
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,2
|
|
|
评论
|
Leonhard Euler设计的桌子。
设L（n-1）是其m部分被限定为素数的前身的（n-1。第n行列出了所有此类分区L（n-1）的乘积（m+1）。
第n行中的最大项是2^（n-1）。
行p素数中的最小项是p。
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
例子
|
三角形开始：
1;
2;
3, 4;
第6、8页；
5, 9, 12, 16;
10, 18, 24, 32;
7, 15, 20, 27, 36, 48, 64;
14, 30, 40, 54, 72, 96, 128;
21、25、28、45、60、80、81、108、144、192、256；
42, 50, 56, 90, 120, 160, 162, 216, 288, 384, 512;
...
第n行的项与（n-1）的分区之间的关系的说明，使得所有部分m都限于素数前置。我们在括号中显示分区，在括号中为下面的每一部分m添加1以获得产品。产品是该序列第n行中的术语。
1 = (1);
[2]
第2行：2；
.
2 = (2), (1+1);
[3] [2*2]
第3行：第3、4行；
.
3 = (2+1), (1+1+1);
[3*2] [2*2*2]
第4行：6、8；
.
4 = (4), (2+2), (2+1+1), (1+1+1+1);
[5] [3*3] [3*2*2] [2*2*2*2]
第5行：5、9、12、16；
.
5 = (4+1), (2+2+1), (2+1+1+1), (1+1+1+1+1);
[5*2] [3*3*2] [3*2*2*2] [2*2*2*2*2]
第6行：10、18、24、32；
等。
|
|
|
数学
|
使用[{n=12}，Take[#，n]&@Values@KeySort@PositionIndex@Array[Total[Flatten[ConstantArray[#1-1，#2]&@@@FactorInteger[#]]&，2^n]]//TableForm（*语法简单，或者更高效*）
f[m_]：=块[{s={Prime@PrimePi[m+1]-1}}，KeySort@Merge[#，Identity]&@Join[{1->{}}；AppendTo[s，Last@s]，如果[Last@s==1，s=DeleteCase[s，1]；如果[Length@s==0，Break[]，s=MapAt[Prime[PrimePi[#+1]-1]-1&，s，-1]]，s=MapAt[Prime[Prime[#+1]-1&，s，-1]]&@Total[s]，{i，Infinity}]][[-1，-1]4]；地图[Union[Times@@#&/@#]&，Values@f[40]+1]//平展
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,标签
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
1, 2, 3, 3, 5, 3, 7, 3, 5, 3, 11, 5, 13, 3, 7, 5, 17, 3, 19, 7, 5, 5, 23, 3, 5, 3, 7, 5, 29, 3, 31, 3, 13, 3, 11, 7, 37, 7, 7, 3, 41, 3, 43, 13, 5, 3, 47, 7, 13, 3, 19, 7, 53, 3, 7, 3, 5, 3, 59, 5, 61, 3, 11, 7, 17, 3, 67, 19, 5, 5, 71, 3, 73, 7, 11, 5, 17, 5, 79
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,2
|
|
|
链接
|
|
|
|
数学
|
gradus[n_]：=1+Plus@@（（First[#]-1）*Last[#]&/@FactorInteger[n]）；a[n_]：=固定点[梯度，n]；数组[a，100](*阿米拉姆·埃尔达尔2019年11月11日*）
|
|
|
黄体脂酮素
|
（Python 3）
从gmpy2导入is_prime
来自sympy导入因子
定义梯度（n）：
总和=0
因子=因子（n）
对于p，a在factors.items（）中：
总和+=（p-1）*a
返回和+1
如果__name__==“__main__”：
闪光=[]
对于范围（1,80）内的x：
反光附加（梯度（x））
为True时：
对于英语中的p：
a=0
如果不为_prime（p）：
glist=[glist中x的梯度（x）]
a=1
如果a==0：
打破
打印（'，'.join（[str（x）for x in glist]）
（PARI）g（n）=我的（f=系数（n））；1+和（k=1，#f~，f[k，2]*（f[k、1]-1））
a（n）=而（n！=n=g（n），）；n个\\雷米·西格里斯特2019年12月3日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.004秒内完成
|
