A159767 Continued fraction expansion of A006891.

2, 1, 1, 85, 2, 8, 1, 10, 16, 3, 8, 9, 2, 1, 40, 1, 2, 3, 2, 2, 1, 17, 1, 1, 5, 3, 2, 6, 3, 5, 1, 1, 3, 3, 15, 3, 1, 1, 7, 2, 3, 1, 7, 2, 1, 55, 1, 1, 1, 1, 4, 9, 1, 2, 1, 36, 1, 5, 10, 1, 1, 2, 1, 4, 1, 4, 5, 5, 1, 1, 130, 1, 3, 1, 1, 2, 1, 3, 1, 3, 2, 3, 2, 2, 547, 9, 18, 3, 1, 4, 2, 1, 1, 2, 2, 2, 1, 6, 1

Offset: 0

Author

Harry J. Smith, Apr 21 2009

Keywords

• nonn
• cofr

Comments

Feigenbaum bifurcation velocity alpha.

Examples

			-alpha = 2.50290787509589282... = 2 + 1/(1 + 1/(1 + 1/(85 + 1/(2 + ...))))
		

Links

• Harry J. Smith, Table of n, a(n) for n = 0..995

Programs

Mathematica

(* assign to 'x' the Feigenbaum bifurcation velocity alpha *); ContinuedFraction[ x, 100] (* Robert G. Wilson v, May 31 2009 *)

PARI

{ default(realprecision,1019); alpha=-2.\
5029078750958928222839028732182157863812713767271499773361920567\
7923546317959020670329964974643383412959523186999585472394218237\
7785445179272863314993372578112163594879503744781260997380598671\
2397117373289276654044010306698313834600094139322364490657889951\
2205843172507873377463087853424285351988587500042358246918740820\
4281700901714823051821621619413199856066129382742649709844084470\
1008054549677936760888126446406885181552709324007542506497157047\
0475419932831783645332562415378693957125097066387979492654623137\
6745918909813116752434221110130913127837160951158341230841503716\
4997020224681219644081216686527458043026245782561067150138521821\
6449532543349873487413352795815351016583605455763513276501810781\
1948369459574850237398235452625632779475397269902012891516645793\
9420198920248803394051699686551494477396533876979741232354061781\
9896112494095990353128997733611849847377946108428833293833903950\
9008914086351525626803381414669279913310743349705143545201344643\
4264752001621384610729922641994332772918977769053802596851; x=contfrac(-alpha); for (n=1, 996, write("b159767.txt", n-1, " ", x[n])); } (End)

Extensions

Old PARI program deleted by Harry J. Smith, May 19 2009