搜索： a138854-编号：a138853
|
| |
|
|
A137365号
|
| 素数n，使n=p1^3+p2^3+p3^3，3个不同素数的立方体之和。 |
|
+10
5
|
|
|
|
1483, 5381, 6271, 7229, 9181, 11897, 13103, 13841, 14489, 17107, 20357, 25747, 26711, 27917, 30161, 30259, 31247, 32579, 36161, 36583, 36677, 36899, 36901, 42083, 48817, 54181, 55511, 55691, 56377, 56897, 57637, 59093, 64151, 66347
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1，1
|
|
|
评论
|
数字n可以有多重分解；例如，n＝185527和n＝451837有两个，n＝8627527和n=32816503有三个。具有多个分解的最小n为n=185527=13^3+43^3+47^3=19^3+31^3+53^3，为序列中的第94位-R.J.马塔尔，2008年5月1日
具有n个分解{及其素数}的最小素数p为1483={3,5,11}；185527=（13，43，47}&{19，31，53}；8627527={19，151，173}，{33，139，181}&71，73，199}和1122871751={113，751，887}，}131，701，919}，[151，659，941}&{29，107，1039}-罗伯特·威尔逊v2008年5月4日
术语数量<10^n:0，0，0，5，56，327，2172，13417，86264，567211-罗伯特·威尔逊v2008年5月4日
分解数<10^n:0，0，0，5，56，330，2201，13609，87200，571770-罗伯特·威尔逊v2008年5月4日
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
示例
|
1483=3+5^3+11^3，5381=17^3+7^3+5^3，6271=3^3+11^3+17^3，依此类推。
|
|
|
MAPLE公司
|
isA030078:=进程（n）本地cbr；cbr:=楼层（根[3]（n））；如果cbr^3=n和isprime（cbr），则为true；否则为假；fi；结束时间：
isA137365:=进程（n）本地p1、p2、p3、p3cub；如果是素数（n），则p1:=2；而p1^3<=n-16做p2:=下一素数（p1）；而p1^3+p2^3<=n-8做p3cub：=n-p1^3-p2^3；如果p3cub>p2^3且为A030078（p3cub），则返回（true）；fi；p2：=下一个顶点（p2）；od:p1:=下一个顶点（p1）；od；RETURN（返回）（错误）；否则返回（false）；fi；结束时间：
对于从1开始的i，如果是A137365（ithprime（i）），则打印f（“%d\n”，ithprime；fi；日期：
#（结束）
|
|
|
数学
|
数组[r，99]；数组[y，99]；对于[i=0，i<10^2，r[i]=y[i]=0；i++]；z=4^2；n=0；对于[i1=1，i1<z，a=素数[i1]；a2=a^3；对于[i2=i1+1，i2<z，b=Prime[i2]；b2=b^3；对于[i3=i2+1，i3<z，c=Prime[i3]；c2=c^3；p=a2+b2+c2；如果[PrimeQ[p]，打印[a2，“+”，b2，“+“，c2，“=”，p]；n++；r[n]=p]；i3++]；i2++]；i1++]；排序[Array[r，88]](*弗拉基米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基*)
lst={}；Do[p=素数[q]^3+素数[r]^3+素数[s]^3；如果[PrimeQ@p，AppendTo[lst，p]]，{q，13}，{r，q-1}，}s，r-1}]；接受[Sort@lst，36](*罗伯特·威尔逊v2008年4月13日*）
nn=20；lim=素数[nn]^3+3^3+5^3；并集[Select[Total[#^3]&/@子集[Prime[Range[2，nn]]，{3}]，#<lim&&PrimeQ[#]&]](*哈维·P·戴尔2011年1月15日*）
|
|
|
黄体脂酮素
|
（PARI）c=0；对于素数（p=1，10^6，isA138853（p）&写（“b137365.txt”，c++，“”，p））\\M.F.哈斯勒2008年4月13日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
495, 1483, 1701, 1799, 2349, 2567, 2665, 3555, 3653, 3871, 5065, 5283, 5381, 6271, 6369, 6587, 7011, 7137, 7229, 7235, 7327, 7453, 8217, 8315, 8441, 8533, 9083, 9181, 9399, 10387, 11799, 11897, 12115, 12319, 12537, 12635, 13103, 13525, 13623, 13841
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1，1
|
|
|
评论
|
去掉对奇数素数的限制会给这个奇数项序列增加形式为8+p（i）^3+p（j）^3（i>j>1）的偶数项序列，即8+{偶数项A120398型}，参见。A138854号.
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
黄体脂酮素
|
（PARI）为A138853（n）=局部（c，d）；n> 494&&forprime（p=楼层（sqrtn（n\3+1,3））+1，楼层（squartn（n-151,3）），d=n-p^3；对于prime（q=楼层（sqrtn（d\2+1，3））+1，min（p-1，楼层（squartn（d-26，3）；isprime（round（sqrtn（c，3））和return（1））
对于步骤（n=3^3+5^3+7^3，10^5，2，是A138853（n）&打印1（n“，”））
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
24, 43, 62, 81, 141, 160, 179, 258, 277, 359, 375, 378, 397, 476, 495, 593, 694, 713, 811, 1029, 1347, 1366, 1385, 1464, 1483, 1581, 1682, 1701, 1799, 2017, 2213, 2232, 2251, 2330, 2349, 2447, 2548, 2567, 2665, 2670, 2689, 2787, 2883, 3005, 3536, 3555
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1，1
|
|
|
评论
|
序列中立方体的子序列开始于505^3、535^3，709^3，865^3和1033^3，1037^3，1067^3、1133^3、1513^3。。。请参见A258262型.
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
示例
|
2^3+2^3+2^3=24. 2^3+2^3+3^3=43. 2^3+3^3+3^3=62. 3^3+3^3+3^3=81.
|
|
|
MAPLE公司
|
局部a、p、q、r；
a:={}；
p:=2；
而p^3<lim do
q：=p；
而p^3+q^3<lim do
r：=q；
而p^3+q^3+r^3<=lim do
a:=并集{p^3+q^3+r^3}；
r：=下一个顶点（r）；
结束do：
q：=下一素数（q）；
结束do：
p:=下一素数（p）；
结束do；
a；
结束进程：
|
|
|
数学
|
lim=15；取[Sort@DeleteDuplicates[Total/@（Tuples[Prime@Range@lim，3]^3）]，3 lim](*迈克尔·德弗利格2015年6月12日*）
|
|
|
黄体脂酮素
|
（哈斯克尔）
导入数据。集合（singleton、deleteFindMin、fromList）
导入合格数据。Set as Set（并集）
导入合格数据。列表。按列表排序（联合）
a258865 n=a258865_列表！！（n-1）
a258865_list=tail$f（singleton 1）1[][]a030078_list，其中
f s z vs qcs pcs’@（pc:pcs）
|m<z=m:f s“z vs qcs pcs”
|否则=f（Set.union s$fromList$map（+pc）ws）
pc ws（pc:qcs）个
其中ws=List.union vs$map（+pc）（pc:qcs）
（m，s'）=删除查找最小值
（PARI）list（lim）=my（v=list（），P=apply（P->P^3，素数（sqrtnint（lim\=1,3）））；foreach（P，P，foreach）（P，q，my（s=P+q，t）；对于（i=1，#P，t=s+P[i]；如果（t>lim，break）；列表（v，t））；集合（v）\\查尔斯·R·Greathouse IV2021年8月9日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
152, 370, 468, 1358, 1456, 1674, 2224, 2322, 2540, 3528, 4940, 5038, 5256, 6244, 6886, 6984, 7110, 7202, 8190, 9056, 11772, 12194, 12292, 12510, 13498, 14364, 17080, 19026, 24416, 24514, 24732, 25720, 26586, 29302, 29818, 29916, 30134
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1，1
|
|
|
链接
|
|
|
|
示例
|
3^3+5^3=152=a（1）。
3^3+7^3=370=a（2）。
5^3+7^3=468=a（3）。
|
|
|
MAPLE公司
|
A137632号：=proc（amax）局部a，p，q；a:={}；p:=3；而p^3<amax do q：=下一素数（p）；而p^3+q^3<amax做a:=并集{p^3+q^3}；q：=下一素数（q）；od:p:=下一素数（p）；od：排序（convert（a，list））；结束时间：A137632号(80000) ; #R.J.马塔尔2008年5月4日
|
|
|
数学
|
f[upto_]：=模块[{max=天花板[Power[upto-27，（3）^-1]]，prs}，prs=基本[范围[2，max]]；选择[Union[Total/@（Subsets[prs，{2}]^3）]，#<=最多&]]；传真[31000](*哈维·P·戴尔2011年4月20日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
76、185、234、679、728、837、1112、1161、1270、1764、2470、2519、2628、3122、3443、3492、3555、3601、4095、4528、5886、6097、6146、6255、6749、7182、8540、9513、12208、12257、12366、12860、13293、14651、14909、14958、15067、15561、15624、15994
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1，1
|
|
|
评论
|
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
数学
|
对于[{nn=40}，取[Union[Mean/@（子集[Prime[Range[2，nn/2]]，{2}]^3）]，nn]](*哈维·P·戴尔2013年11月16日*）
|
|
|
黄体脂酮素
|
（PARI）用于（n=1，10^5，isA120398（2*n）&打印1（n“，”））
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.012秒内完成
|
