This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A077626 #21 Apr 25 2022 11:27:31 %S A077626 0,6,10,18,30,54,92,162,280,486,840,1458,2524,4374,7574,13122,22726, %T A077626 39366,68182,118098,204550,354294,613654,1062882,1840964,3188646, %U A077626 5522896,9565938,16568690,28697814,49706070,86093442,149118214,258280326,447354646,774840978 %N A077626 Largest term in periodic part of continued fraction expansion of square root of 1+3^n or 0 if 1+3^n is square. %C A077626 a(n) = 0 iff n = 1, as a consequence of Catalan's conjecture or Mihăilescu's theorem. - _Bernard Schott_, Apr 25 2022 %t A077626 Table[Max[Last[ContinuedFraction[Sqrt[1+3^u]]]], {u, 1, 32}] %o A077626 (PARI) a(n) = if (n==1, 0, 2*sqrtint(3^n)); \\ _Michel Marcus_, Apr 20 2022 %Y A077626 Cf. A077624-A077635. %Y A077626 Equals 2*A017913(n) for n > 1. %K A077626 nonn %O A077626 1,2 %A A077626 _Labos Elemer_, Nov 13 2002 %E A077626 a(1) changed and definition clarified by _Chai Wah Wu_, Sep 18 2021 %E A077626 a(31)-a(36) from _Chai Wah Wu_, Apr 20 2022