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!)
A112809 Positions of records in A110566. 1

%I

%S 1,6,20,21,42,120,342,506,567,594,600,610,2184,4896,6108,6162,6498,

%T 12760,14067,14157,14201,93942,123462,123519,734413,2451397,4591010,

%U 11571129,13346540,13619348,13619790,46180567

%N Positions of records in A110566.

%t c = 0; a = h = 1; t = {}; Do[a = LCM[a, n]; h = h + 1/n; b = a/Denominator[h]; If[b > c, c = b; AppendTo[t, n]], {n, 10^6}]; t

%o (PARI) lista(nn) = {rec = 0; for (n=1, nn, new = lcm(vector(n, k, k))/denominator(sum(k=1, n, 1/k)); if (new > rec, print1(n, ", "); rec = new););} \\ _Michel Marcus_, Mar 07 2018

%Y Cf. A110566, A001008, A002805, A003418, A025529, A098464, A112810.

%K more,nonn

%O 1,2

%A _Robert G. Wilson v_, Sep 19 2005

%E a(27)-a(28) from _Amiram Eldar_, Dec 18 2018

%E a(29)-a(31) from _Chai Wah Wu_, Mar 08 2021

%E a(32) from _Chai Wah Wu_, Mar 14 2021

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 30 02:36 EDT 2021. Contains 346346 sequences. (Running on oeis4.)