登录
A087598号
对m进行编号,使序列m中的所有项,A040115号(m) ,A040115号(A040115号(m) )。..,0是三角形数字(A000217号).
0, 1, 3, 6, 10, 21, 28, 36, 45, 55, 66, 78, 171, 465, 528, 666, 2211, 4465, 22791, 333336
抵消
1,3
评论
a(21)需要A040115号(a(21))。方程式A040115号(x) =t对于任何项t都简化为计算有限个椭圆曲线上的积分点。计算表明,用这种方法不能得到任何新的数。因此序列是有限的和完整的。 -马克斯·阿列克塞耶夫2024年8月2日
例子
528是一个术语,因为A040115号(528) = 36,A040115号(36) = 3,A040115型(3) =0,其中528、36、3和0是三角形数字。
数学
trnoQ[n_]:=整数Q[(Sqrt[8n+1]-1)/2];oknQ[n_]:=模块[{ll=NestWhileList[FromDigits[Abs[Differences[IntegerDigits[#]]]&,n,#>9&]},长度[ll]>1&&And@@trnoQ/@ll];选择[累计[范围[2000000]],oknQ](*哈维·P·戴尔2011年5月15日*)
黄体脂酮素
(PARI)dd(k)={local(kshf,res,dig,odig,p);kshf=k;res=0;odig=kshf%10;p=0;while(kshf>9,kshf=floor(kshf10);dig=kshf%10;res+=10^p*abs(dig-odig);odig=dig;p++;);return(res);}isA000217(n)={if(issquare(1+8*n),returnA000217号(n) ={return(n*(n+1)/2);}isA087598(n)={local(nredu);nredu=n;while(nredu>10,if(isA000217(nredo),nredu=dd(nretu),return(A000217号(k) ),打印1(A000217号(k) ,“,”); ) ; ) ; } \\R.J.马塔尔2006年11月19日
关键词
基础,非n,满的,完成
作者
阿玛纳斯·穆尔西2003年9月18日
扩展
更正和扩展人R.J.马塔尔,2006年11月19日
名称已澄清,术语0,1,3,6由马克斯·阿列克塞耶夫2024年7月26日
状态
经核准的