A077634 LCM of terms in periodic part of continued fraction expansion of square root of 1+3^n.

2, 6, 30, 18, 90, 54, 106260, 162, 26040, 486, 341725784400, 1458, 6564164506066423389173040, 4374, 177815552218920, 13122, 2998833665484118393000638135815684490471025925316000, 39366

Offset

1,1

Links

Table of n, a(n) for n=1..18.

Mathematica

Table[Apply[LCM, Last[ContinuedFraction[Sqrt[1+3^u]]]], {u, 1, 25}]

Crossrefs

Cf. A077624-A077635.

Sequence in context: A117213 A127797 A338441 * A095198 A126989 A361492

Adjacent sequences: A077631 A077632 A077633 * A077635 A077636 A077637

Keyword

nonn

Author

Labos Elemer, Nov 13 2002

Status

approved