A093473 a(n) = the next n digits of phi, the golden ratio.

1, 61, 803, 3988, 74989, 484820, 4586834, 36563811, 772030917, 9805762862, 13544862270, 526046281890, 2449707207204, 18939113748475, 408807538689175, 2126633862223536, 93179318006076672, 635443338908659593

Offset: 1

Author

Michael Joseph Halm, May 13 2004

Keywords

• easy
• nonn
• base

Links

• Harry J. Smith, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A081368, A090897.

Programs

Mathematica

With[{phi=RealDigits[GoldenRatio,10,500][[1]]},FromDigits/@Table[Take[ phi,{n (n-1)/2+1,(n(n+1))/2}],{n,25}]] (* Harvey P. Dale, Dec 24 2011 *)

PARI

{ default(realprecision, 20180); x = (1 + sqrt(5))/2; for (n=1, 200, d=floor(x); x=(x-d)*10^(n+1); write("b093473.txt", n, " ", d)); } \\ Harry J. Smith, Jun 19 2009