%I M4351#46 2021年11月28日16:42:48
%S 1,7,15292436207767862917913652821012996958878383625,
%电话:540824059759166861129448623833978754732852662113289
%N Pi-2连续分数中的增量最大项(参见A001203)。
%C 2013年7月18日,C.f.-Eric W.Weisstein_的前10672905501项中没有更大的项
%D.R.W.Gosper,Jr.,π的简单连分式表和导出的十进制近似,数学。公司。,31 (1977), 1044.
%D R.W.Gosper,个人沟通。
%D N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
%D有关更多参考和链接,请参见A001203。
%H H.哈弗曼,<a href=“http://chesswanks.com/pxp/cfpi.html“>Pi的简单连分式
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/Pi.html“>圆周率</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/PiContinuedFraction.html“>Pi连分式</a>
%H<a href=“/index/Ph#Pi314”>与数字Pi相关的序列的索引条目</a>
%t小于等于10^7;a={};r=0;f=连续分数[Pi-2,直至];执行[If[[i]]>r,追加到[a,r=f[[i]]],{i,直到}];a(*Paolo Xausa,2021年11月28日*)
%o(PARI)分配(4096*10^6);
%o默认(realprecision,50000);
%o v=控制(Pi-2);
%o m=0;
%o表示(i=1,#v,如果(v[i]>m,m=v[i];打印1(m,“,”));\\_米歇尔·马库斯(Michel Marcus),2017年8月5日;得到7个术语
%Y参考A001203、A000796、A033090。
%Y除首项外,与A033089相同。
%K nonn公司
%O 1,2号机组
%A _N.J.A.斯隆_
%E由_Eric W.Weisstein_更正(缺少添加的a(9)),2010年12月8日
%E a(12)摘自_Eric W.Weisstein_,2010年12月8日
%E a(13)摘自_Eric W.Weisstein,2011年9月16日
%E a(14)摘自_Eric W.Weisstein,2011年9月17日
%E a(15)摘自_Eric W.Weisstein_,2013年7月18日
%E a(6)由_Bobby Jacobs_修订,2017年8月5日
%E a(16)=A033089(16)来自Jeppe Stig Nielsen,2021年11月28日
|