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

 

Logo


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.

License Agreements, Terms of Use, Privacy Policy. .

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