A077097 Quotient cycle length in continued fraction expansion of sqrt(1+n^n).
1, 1, 4, 1, 30, 1, 32, 1, 1, 1, 20554, 1, 23522, 1, 1013500, 1, 29130218, 1, 3123943068, 1
Offset: 1
Programs
-
Mathematica
Table[Length[Part[ContinuedFraction[Sqrt[1+u^u]], 2]], {u, 1, 15}]
Extensions
a(17)-a(18) from Daniel Suteu, Jan 25 2019
a(19)-a(20) from Vaclav Kotesovec, Aug 29 2019