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!)
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 22 14:15 EDT 2021. Contains 345380 sequences. (Running on oeis4.)