|
|
A031705
|
|
Numbers k such that the least term in the periodic part of the continued fraction for sqrt(k) is 27.
|
|
1
|
|
|
731, 2920, 6567, 11672, 18235, 26256, 35735, 46672, 59067, 72920, 88231, 105000, 123227, 142912, 164055, 186656, 210715, 236232, 263207, 291640, 321531, 352880, 385687, 419952, 455675, 492856, 531495, 552104, 571592, 594496, 613147, 656160
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
lt27Q[n_]:=Module[{sr=Sqrt[n]}, If[IntegerQ[sr], False, Min[ ContinuedFraction[ sr][[2]]]==27]]; Select[Range[660000], lt27Q] (* Harvey P. Dale, May 11 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|