The OEIS Foundation is grateful to everyone who made a donation during our Annual Appeal. Visit the new and spectacular Pictures from the OEIS page!
1,1
T. D. Noe, Table of n, a(n) for n=1..200
Where records occur in A054269.
mx=0; n=0; t=Table[n++; While[p=Prime[n]; len=Length[Last[ContinuedFraction[Sqrt[p]]]]; len<=mx, n++ ]; mx=len; p, {50}]
Cf. A003285, A013645.
Sequence in context: A045331 A053613 A013645 * A172238 A038940 A019383
Adjacent sequences: A130269 A130270 A130271 * A130273 A130274 A130275
nonn
T. D. Noe, May 19 2007
approved