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!)
 A115213 Where record values occur in A113504. 3
 0, 2, 4, 8, 16, 32, 64, 128, 256, 512, 768, 1024, 1025, 1040, 1056, 1088, 1152, 1280, 1536, 2048, 2051, 2060, 2096, 2113, 2120, 2128, 2144, 2177, 2178, 2192, 2208, 2240, 2305, 2312, 2320, 2336, 2432, 2561, 2564, 2568, 2576, 2592, 2624, 2688, 2816, 3073 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS A115212(n) = A113504(a(n)). LINKS Michael De Vlieger, Table of n, a(n) for n = 1..5000 MATHEMATICA Block[{a = {1}, b = {1}, k, n}, Do[k = DigitCount[i, 2, 1]; n = Count[b, m_ /; k == m]; AppendTo[a, n]; AppendTo[b, DigitCount[n, 2, 1]], {i, 2^12}]; Map[-1 + FirstPosition[a, #][[1]] &, Union@ FoldList[Max, a]]] (* Michael De Vlieger, Sep 05 2017 *) CROSSREFS Sequence in context: A072049 A281938 A242350 * A009714 A051535 A008862 Adjacent sequences:  A115210 A115211 A115212 * A115214 A115215 A115216 KEYWORD nonn AUTHOR Reinhard Zumkeller, Jan 17 2006 EXTENSIONS Corrected by T. D. Noe, Oct 25 2006 Offset corrected by Michael De Vlieger, Sep 06 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 June 22 14:15 EDT 2021. Contains 345380 sequences. (Running on oeis4.)