cp's OEIS Frontend

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.

A031620 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 32.

This page as a plain text file.
%I A031620 #16 May 01 2022 17:50:35
%S A031620 13274,21106,21397,21985,44269,58789,75914,77573,78689,93997,96461,
%T A031620 114685,116041,118777,120157,139658,143413,162229,163034,163841,
%U A031620 167906,169546,170369,196093,219865,227417,229325,249962,250961,252965,253970
%N A031620 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 32.
%t A031620 cf32Q[n_]:=Module[{s=Sqrt[n],cf,len},cf=If[IntegerQ[s],{1,1},ContinuedFraction[ s][[2]]];len=Length[cf];OddQ[len]&&cf[[Floor[len/2]]]==cf[[Ceiling[len/2]]] == 32]; Select[ Range[254000],cf32Q] (* _Harvey P. Dale_, May 01 2022 *)
%Y A031620 Subsequence of A003814.
%K A031620 nonn
%O A031620 1,1
%A A031620 _David W. Wilson_
%E A031620 First term 1025 removed by _Georg Fischer_, Jun 16 2019