%I A065007
%S A065007 5,18,39,52,68,85,105,126,149,150,175,202,203,232,263,264,296,297,332,
%T A065007 333,369,370,409,410,450,451,493,494,495,539,540,586,587,588,636,637,
%U A065007 687,688,689,740,741,742,796,797,798,853,854,855,913,914,915,974,975
%N A065007 Integers for which the periodic part of the continued fraction for the 
               square root of n begins with 4.
%e A065007 The continued fraction for the square root of 39 is 6, {4, 12}.
%t A065007 Select[ Range[1000], First[ Last[ ContinuedFraction[ Sqrt[ # ]]]] == 
               4 & ]
%Y A065007 Sequence in context: A063120 A031051 A038346 this_sequence A031428 A007742 
               A000338
%Y A065007 Adjacent sequences: A065004 A065005 A065006 this_sequence A065008 A065009 
               A065010
%K A065007 cofr,easy,nonn
%O A065007 1,1
%A A065007 Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 01 2001