A077638 Sum of terms in periodic part of continued fraction expansion of square root of A051451(n), i.e., sqrt(lcm(1..x)) where x is a prime power from A000961.

0, 2, 6, 8, 18, 42, 57, 105, 372, 1344, 1800, 7291, 32524, 150567, 342906, 738854, 3298239, 20772345, 36965663, 184510241, 1433356755, 7840220998, 56906577387, 113611483212, 843530932394, 6257315565011, 60692272232438, 70311381976766, 692150332693349, 4888462119949170

Offset

1,2

Links

Chai Wah Wu, Table of n, a(n) for n = 1..37

Example

For A051451(10) = 360360, the periodic part is {3,2,1,132,1,2,3,1200} with 1344 as sum of entries, so a(10) = 1344.

Mathematica

t={A051451(n)} Table[Max[Last[ContinuedFraction[Sqrt[Part[t, u]]]]], {u, 1, 24}]

Crossrefs

Cf. A000961, A051451, A077636-A077637.

Sequence in context: A102656 A163911 A301799 * A103015 A323859 A365918

Adjacent sequences: A077635 A077636 A077637 * A077639 A077640 A077641

Keyword

nonn

Author

Labos Elemer, Nov 13 2002

Extensions

a(25)-a(28) from Ray Chandler, Jan 16 2009

a(1) corrected and a(29)-a(30) added by Chai Wah Wu, Sep 19 2021

Status

approved