OFFSET
1,1
COMMENTS
"Central term" means the term at 1/2 of the length of the repeating part, not the term following that term, e.g., if the terms are {a,b,c,d}, the "central term" is b, not c. - Harvey P. Dale, May 19 2012
Includes 2809 * k^2 + 2 * k for k >= 1, where the continued fraction has initial term 53*k and periodic part [53, 106*k], and 3025 * k^2 - 2 * k for k >= 1, where the continued fraction has initial term 55*k-1 and periodic part [1, 53, 1, 110*k-2]. - Robert Israel, Apr 11 2023
LINKS
Robert Israel, Table of n, a(n) for n = 1..107
MATHEMATICA
epQ[n_]:=Module[{p=ContinuedFraction[Sqrt[n]][[2]], len}, len=Length[p]; EvenQ[len]&&p[[len/2]]==53]; nn=12000; With[{trms=Complement[Range[ nn], Range[Floor[Sqrt[nn]]]^2]}, Select[trms, epQ]] (* Harvey P. Dale, May 19 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Definition clarified by Harvey P. Dale, Apr 11 2022
STATUS
approved