搜索： a095134-编号：a095134
|
| |
| |
|
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 17, 22, 26, 29, 33, 37, 58, 75, 126, 127, 150, 205, 356, 424, 492, 661, 674, 697, 831, 1687, 2068, 3422, 3495, 4183, 4920, 5128
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
链接
|
|
|
|
数学
|
f[n_]：=乘积[素数[i]，{i，2，n，2}]+乘积[质数[i],{i，1，n，2]]；f[1]=2；Do[If[PrimeQ[f[n]]，打印[n]，{n，2060}]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 3, 1, 2, 3, 2, 2, 1, 2, 2, 3, 1, 3, 2, 1, 2, 2, 4, 1, 3, 4, 3, 1, 2, 3, 4, 4, 2, 3, 4, 3, 3, 4, 3, 5, 3, 6, 3, 5, 4, 3, 4, 2, 1, 2, 3, 2, 3, 2, 5, 5, 4, 3, 4, 6, 5, 2, 5, 3, 4, 1, 4, 2, 2, 3, 4
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,12
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
数学
|
PrimeFactors[n_]：=扁平[表[#[[1]]，{1}]&/@FactorInteger[n]]；f[n_]：=乘积[素数[i]，{i，2，n，2}]+乘积[质数[i],{i，1，n，2]]；f[1]=2；表[Length[PrimeFactors[f[n]]]，{n，80}]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A095137号
|
| 第一层（n/2）均匀诱导底漆的乘积与第一层（n/2）奇异诱导底漆的积之间的绝对差异。 |
|
+10
三
|
|
|
|
2, 1, 7, 11, 89, 163, 1597, 3317, 37823, 107413, 1182887, 4232341, 49100059, 184657283, 2329965377, 10114830259, 138903895201, 622143222539, 9382665690241, 44778520855589, 686482057860331, 3598441529151191
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1，1
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
例子
|
a（5）=2*5*11-3*7=89，a（6）=3*7*13-2*5*11=163；
a（7）=2*5*11*17-3*7*13=1597，a（8）=3*7x13*19-2*5x11*17=3317。
|
|
|
数学
|
PrimeFactors[n_]：=扁平[表[#[[1]]，{1}]&/@FactorInteger[n]]；f[n_]：=Abs[积[Prime[i]，{i，2，n，2}]+积[Prime[i]、{i，1，n，2]]；f[1]=2；表[f[n]，{n，24}]
连接[{2}，表[Abs[Times@@Prime[Range[1，Floor[n/2]，2]]-Times@@Prime[Range[2，Floor[n/2],2]]，{n，4，45，2}]](*哈维·P·戴尔2023年1月11日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.003秒内完成
|
