login
A020435
Numbers k such that the continued fraction for sqrt(k) has period 96.
0
2311, 2956, 3631, 3661, 4327, 5023, 5374, 5469, 5769, 6009, 6046, 7151, 7342, 8156, 8206, 8257, 8611, 9148, 9346, 9806, 10144, 10364, 10473, 10516, 10732, 10798, 11134, 11503, 11950, 12271, 12273, 12364, 12521, 12799, 12814, 12897, 12934, 13354, 13579
OFFSET
1,1
MATHEMATICA
p96Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Length[ ContinuedFraction[ s][[2]]]]==96]; Select[Range[14000], p96Q] (* Harvey P. Dale, Apr 02 2016 *)
CROSSREFS
Sequence in context: A288072 A087978 A261210 * A288798 A035893 A260049
KEYWORD
nonn
STATUS
approved