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!)
A258410 Nonnegative integers with an equal number of occurrences of all digits in bijective base-2 numeration. 6
4, 5, 18, 20, 21, 24, 25, 27, 70, 74, 76, 77, 82, 84, 85, 88, 89, 91, 98, 100, 101, 104, 105, 107, 112, 113, 115, 119, 270, 278, 282, 284, 285, 294, 298, 300, 301, 306, 308, 309, 312, 313, 315, 326, 330, 332, 333, 338, 340, 341, 344, 345, 347, 354, 356, 357 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Alois P. Heinz, Table of n, a(n) for n = 1..10000

Wikipedia, Bijective numeration

EXAMPLE

4 = 12_bij2, 5 = 21_bij2, 18 = 1122_bij2, 20 = 1212_bij2.

MAPLE

p:= proc(n) local d, m, r; m:= n; r:= 0;

      while m>0 do d:= irem(m, 2, 'm');

        if d=0 then d:=2; m:= m-1 fi;

        r:= r+x^d

      od;

      simplify(r/(x+x^2))::integer

    end:

a:= proc(n) option remember; local k;

      for k from 1+`if`(n=1, 0, a(n-1)) by 1

      while not p(k) do od; k

    end:

seq(a(n), n=1..70);

CROSSREFS

Cf. A007931, A214676, A257869, A258411.

Sequence in context: A215024 A066879 A276091 * A299241 A134750 A051949

Adjacent sequences:  A258407 A258408 A258409 * A258411 A258412 A258413

KEYWORD

nonn,base

AUTHOR

Alois P. Heinz, May 29 2015

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 September 28 09:32 EDT 2021. Contains 347714 sequences. (Running on oeis4.)