%I #12 Mar 10 2017 13:34:26

%S 23,3,1,5,1,8,2,4,1,2,3,1,1,11,15,2,2,1,1,1,1,1,1,2,2,15,11,1,1,3,2,1,

%T 4,2,8,1,5,1,3,46,3,1,5,1,8,2,4,1,2,3,1,1,11,15,2,2,1,1,1,1,1,1,2,2,

%U 15,11,1,1,3,2,1,4,2,8,1,5,1,3,46,3,1,5,1,8,2,4,1,2,3

%N Continued fraction for sqrt(541).

%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>

%H <a href="/index/Rec#order_39">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).

%p with(numtheory): Digits := 300: convert(evalf(sqrt(541)),confrac);

%t ContinuedFraction[Sqrt[541],100] (* or *) PadRight[{23},100,{46,3,1,5,1,8,2,4,1,2,3,1,1,11,15,2,2,1,1,1,1,1,1,2,2,15,11,1,1,3,2,1,4,2,8,1,5,1,3}] (* _Harvey P. Dale_, Jan 01 2016 *)

%K nonn,cofr,easy,less

%O 0,1

%A _N. J. A. Sloane_.