login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A031629
Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 41.
0
3853, 35050, 35425, 51197, 53021, 71993, 74153, 95089, 96946, 122789, 124193, 126314, 152461, 154025, 157177, 190537, 223313, 228058, 230929, 232853, 266881, 267914, 268949, 269986, 273109, 274154, 275201, 314329, 363245, 368077, 409282
OFFSET
1,1
MATHEMATICA
cf41Q[n_]:=Module[{s=Sqrt[n], cf, len}, cf=If[IntegerQ[s], {1, 1}, ContinuedFraction[ s][[2]]]; len=Length[cf]; OddQ[len]&&cf[[(len+1)/2]] == 41]; Select[Range[410000], cf41Q] (* Harvey P. Dale, Jun 21 2019 *)
CROSSREFS
Sequence in context: A234918 A015069 A015070 * A220752 A257780 A068267
KEYWORD
nonn
EXTENSIONS
First term 1682 removed by Georg Fischer, Jun 16 2019
STATUS
approved