|
|
A002946
|
|
Continued fraction for cube root of 3.
(Formerly M0408)
|
|
3
|
|
|
1, 2, 3, 1, 4, 1, 5, 1, 1, 6, 2, 5, 8, 3, 3, 4, 2, 6, 4, 4, 1, 3, 2, 3, 4, 1, 4, 9, 1, 8, 4, 3, 1, 3, 2, 6, 1, 6, 1, 3, 1, 1, 1, 1, 12, 3, 1, 3, 1, 1, 4, 1, 6, 1, 5, 1, 2, 1, 3, 3, 11, 8, 1, 139, 8, 2, 8
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
REFERENCES
|
H. P. Robinson, Letter to N. J. A. Sloane, Nov 13 1973.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
EXAMPLE
|
3^(1/3) = 1.44224957030740838... = 1 + 1/(2 + 1/(3 + 1/(1 + 1/(4 + ...)))). [Harry J. Smith, May 08 2009]
|
|
MAPLE
|
with(numtheory): cfrac(3^(1/3), 80, 'quotients'); # Muniru A Asiru, Nov 02 2018
|
|
MATHEMATICA
|
ContinuedFraction[Power[3, (3)^-1], 120] (* Harvey P. Dale, May 11 2011 *)
|
|
PROG
|
(PARI) { allocatemem(932245000); default(realprecision, 21000); x=contfrac(3^(1/3)); for (n=1, 20000, write("b002946.txt", n, " ", x[n])); } \\ Harry J. Smith, May 08 2009
(Magma) SetDefaultRealField(RealField(100)); ContinuedFraction(3^(1/3)); // G. C. Greubel, Nov 02 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,cofr
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|