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
Keywords
Examples
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.
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..37
Programs
-
Mathematica
t={A051451(n)} Table[Max[Last[ContinuedFraction[Sqrt[Part[t, u]]]]], {u, 1, 24}]
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