OFFSET
0,4
COMMENTS
a(n) = 1 iff n is even. In this case, 3^n + 1 = A002522(3^(n/2)) and the continued fraction expansion of sqrt(3^n+1) is {3^(n/2); 2*3^(n/2), 2*3^(n/2), 2*3^(n/2), 2*3^(n/2), ...}. - Bernard Schott, Sep 25 2019
FORMULA
EXAMPLE
The period of sqrt(244) contains 26 terms: [1, 1, 1, 1, 1, 2, 1, 5, 1, 1, 9, 1, 6, 1, 9, 1, 1, 5, 1, 2, 1, 1, 1, 1, 1, 30], so a(5) = 26.
MAPLE
with(numtheory): [seq(nops(cfrac(sqrt(3^k+1), 'periodic', 'quotients')[2]), k=2..18)];
MATHEMATICA
Table[Length[Last[ContinuedFraction[Sqrt[3^w+1]]]], {w, 1, 40}] (* corrected by Harvey P. Dale, Dec 05 2014 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Labos Elemer, Jul 13 2001
EXTENSIONS
More terms from Harvey P. Dale, Dec 05 2014
a(41)-a(42) from Vaclav Kotesovec, Sep 17 2019
a(0), a(43)-a(48) from Chai Wah Wu, Sep 25 2019
a(49)-a(56) from Chai Wah Wu, Oct 03 2019
STATUS
approved