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!)
A074097 Record values in A074078. 2

%I

%S 2,4,13,15,21,22,23,27,29,34,36,40

%N Record values in A074078.

%C RECORDS transform of A074078.

%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>

%t ce[n_] := Length[NestWhileList[(n/3)*Ceiling[#] &, n/3, ! IntegerQ[#] &]] - 1; t = {}; r = 0; Do[If[ce[n] > r, AppendTo[t, r = ce[n]]], {n, 3, 5*10^5}]; t (* _Jayanta Basu_, Jul 31 2013 *)

%Y Cf. A074078, A074098.

%K nonn

%O 1,1

%A _N. J. A. Sloane_, Sep 17 2002

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 September 26 05:07 EDT 2021. Contains 347664 sequences. (Running on oeis4.)