A002353 Denominators of convergents to cube root of 3.
1, 2, 7, 9, 43, 52, 303, 355, 658, 4303, 9264, 50623, 414248, 1293367, 4294349, 18470763, 41235875, 265886013, 1104779927, 4685005721, 5789785648, 22054362665, 49898510978, 171749895599, 736898093374, 908647988973, 4371490049266, 40252058432367
Offset: 0
References
- D. H. Lehmer, Guide to Tables in the Theory of Numbers. Bulletin No. 105, National Research Council, Washington, DC, 1941, p. 67.
- P. Seeling, Verwandlung der irrationalen Groesse ... in einen Kettenbruch, Archiv. Math. Phys., 46 (1866), 80-120.
- N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
- N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..999
Programs
-
Mathematica
Denominator[Convergents[3^(1/3), 40]] (* Vincenzo Librandi, Sep 09 2013 *)
-
PARI
a(n)= contfracpnqn(contfrac(3^(1/3), n))[2, 1]; \\ Michel Marcus, Sep 08 2013
Extensions
More terms from Michel Marcus, Sep 08 2013
Offset changed by Andrew Howroyd, Jul 04 2024