The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A146345 Indices in A146326 where records occur. 38
 1, 2, 6, 18, 31, 43, 94, 106, 151, 211, 331, 394, 526, 694, 751, 886, 919, 1114, 1324, 1726, 1759, 1831, 2011, 2311, 2326, 2671, 3019, 3691, 3754, 3931, 4174, 4951, 4999, 5119, 6211, 6406, 7606, 8254, 8719, 8779, 9244, 9619, 9739, 10399, 10651, 12919, 13126 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Robert G. Wilson v and Amiram Eldar, Table of n, a(n) for n = 1..416 (terms 1..218 from Robert G. Wilson v) MAPLE A146326 := proc(n) if not issqr(n) then numtheory[cfrac]( (1+sqrt(n))/2, 'periodic', 'quotients') ; nops(%[2]) ; else 0 ; fi; end: read("transforms") ; a26 := [seq(A146326(n), n=1..1400)] ; RECORDS(a26)[2] ; # R. J. Mathar, Sep 06 2009 MATHEMATICA f[n_] := Length@ContinuedFraction[(1 + Sqrt[n])/2][[-1]]; mx = -1; k = 1; lst = {}; While[k < 14000, a = f@k; If[a > mx, mx = a; AppendTo[lst, k]]; k++]; lst (* Robert G. Wilson v, Apr 11 2017 *) CROSSREFS Cf. A000290, A078370, A146326-A146345, A146348-A146360, A146363. Sequence in context: A277200 A277324 A034881 * A328633 A064842 A302647 Adjacent sequences:  A146342 A146343 A146344 * A146346 A146347 A146348 KEYWORD nonn AUTHOR Artur Jasinski, Oct 30 2008 EXTENSIONS 19 replaced by 18, 394 inserted, 4 more terms added by R. J. Mathar, Sep 06 2009 More terms from Robert G. Wilson v, Apr 11 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 25 10:05 EDT 2021. Contains 346289 sequences. (Running on oeis4.)