Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #7 Aug 14 2018 12:02:48
%S 886,919,1006,1039,1141,1153,1291,1471,1699,1801,1837,1951,2131,2167,
%T 2239,2347,2449,2539,2692,2977,3011,3189,3457,3499,3546,3557,3561,
%U 3693,3727,3742,3789,3793,3911,3929,3991,4197,4273,4306,4351,4426,4526,4529
%N Period of continued fraction for sqrt(n) contains exactly 26 ones.
%t cf26Q[n_]:=Module[{s=Sqrt[n]},If[IntegerQ[s],1,Count[ContinuedFraction[s][[2]],1]]==26]; Select[Range[4600],cf26Q] (* _Harvey P. Dale_, Aug 14 2018 *)
%K nonn
%O 1,1
%A _David W. Wilson_