A077098 Length of period of the continued fraction expansion of sqrt(-1+n^n).

2, 1, 2, 10, 2, 26, 2, 2, 2, 84531, 2, 531160, 2, 4738, 2, 3482830482, 2, 428195747108, 2

Offset: 2

Author

Labos Elemer, Nov 05 2002

Keywords

• nonn
• more

Comments

If a(n) = 2 then (n^n - 1) is in A013642. - Bernard Schott, Sep 25 2019

Crossrefs

Cf. A003285, A048861.

Programs

Mathematica

Table[Length[Part[ContinuedFraction[Sqrt[ -1+u^u]], 2]], {u, 2, 15}]

Formula

a(n) = A003285(A048861(n)). - Michel Marcus, Sep 27 2019

Extensions

a(17)-a(18) from Chai Wah Wu, Sep 24 2019

a(19)-a(20) from Chai Wah Wu, Sep 27 2019