A005532 Decimal expansion of fifth root of 3.
1, 2, 4, 5, 7, 3, 0, 9, 3, 9, 6, 1, 5, 5, 1, 7, 3, 2, 5, 9, 6, 6, 6, 8, 0, 3, 3, 6, 6, 4, 0, 3, 0, 5, 0, 8, 0, 9, 3, 9, 3, 0, 9, 9, 9, 3, 0, 6, 8, 7, 7, 9, 8, 1, 1, 0, 4, 6, 1, 7, 3, 0, 1, 4, 3, 6, 0, 7, 4, 6, 6, 5, 3, 7, 7, 5, 4, 9, 3, 5, 6, 6, 6, 0, 5, 8, 9, 5, 1, 4, 4, 5, 8, 8, 1, 2, 3, 4, 2, 5, 6, 5, 9, 0, 2
Offset: 1
Examples
1.245730939615517325966680336640305080939309993068779811046173... - _Harry J. Smith_, May 12 2009
References
- N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
Links
Crossrefs
Cf. A003117 (continued fraction). - Harry J. Smith, May 12 2009
Cf. A246708.
Programs
-
Maple
Digits := 200: it := evalf(3^(1/5)/10, 200)-floor(evalf(3^(1/5)/10, 200)): for i from 1 to 150 do printf(`%d,`,floor(10*it)): it := 10*it-floor(10*it): od:
-
Mathematica
RealDigits[N[3^(1/5),200]][[1]] (* Vladimir Joseph Stephan Orlovsky, Jan 22 2012 *) RealDigits[Surd[3,5],10,120][[1]] (* Harvey P. Dale, Dec 10 2024 *)
-
PARI
{ default(realprecision, 20080); x=3^(1/5); for (n=1, 20000, d=floor(x); x=(x-d)*10; write("b005532.txt", n, " ", d)); } \\ Harry J. Smith, May 12 2009
Extensions
More terms from James Sellers, Feb 19 2001