[go: up one dir, main page]

login
A031701
Numbers k such that the least term in the periodic part of the continued fraction for sqrt(k) is 23.
1
531, 2120, 4767, 8472, 13235, 19056, 25935, 33872, 42867, 52920, 64031, 76200, 89427, 103712, 119055, 135456, 152915, 171432, 191007, 211640, 233331, 256080, 279887, 292728, 304752, 319272, 330675, 357656, 385695, 414792, 444947, 476160
OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 60 terms from Vincenzo Librandi)
MATHEMATICA
Select[Range[500000], !IntegerQ[Sqrt[#]] && Min[ContinuedFraction[Sqrt[#]][[2]]] == 23&] (* Vincenzo Librandi, Feb 10 2012 *)
CROSSREFS
Sequence in context: A345387 A031521 A156772 * A158367 A225937 A225936
KEYWORD
nonn
STATUS
approved