login
A093473
a(n) = the next n digits of phi, the golden ratio.
3
1, 61, 803, 3988, 74989, 484820, 4586834, 36563811, 772030917, 9805762862, 13544862270, 526046281890, 2449707207204, 18939113748475, 408807538689175, 2126633862223536, 93179318006076672, 635443338908659593
OFFSET
1,2
LINKS
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 *)
PROG
(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
CROSSREFS
Sequence in context: A251426 A232858 A373724 * A000506 A008358 A317283
KEYWORD
easy,nonn,base
AUTHOR
Michael Joseph Halm, May 13 2004
STATUS
approved