login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A118251 a(1)=1. Concatenate onto the end of the sequence (from left to right) the integer m_n converted into binary and reversed (with the most significant digit on the right), where m_n is the smallest integer > A118252(n-1) and whose reversed binary representation does not occur anywhere earlier in the sequence (when the concatenated sequence is read from left to right). A118252(n) then equals m_n when written in decimal. 6
1, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Michael De Vlieger, Table of n, a(n) for n = 1..11424 (Contains the reversed binary values of the first 1000 terms of A118252.)

EXAMPLE

The sequence begins 1,0,1,1,1,0,0,1,0,0,0,1,0,1,0,1,1,1,0,1,0,0,1,1. Now A118252(8) = 12, which is represented by the 0,0,1,1 at the end of the sequence. The binary representation of 13 (1011 in binary and reversed) and 14 (0111 in binary and reversed) both occur earlier in the sequence. But the binary representation of 15 (1111 in binary and reversed) does not occur earlier in the sequence, so (1,1,1,1) is added to the end of the sequence. And A118252(9) becomes 15.

MATHEMATICA

a = {1}; b = {1}; Do[k = b[[i - 1]] + 1; While[SequenceCount[Flatten@ a, Set[d, Reverse@ IntegerDigits[k, 2]]] != 0, k++]; a = Join[a, d]; AppendTo[b, k], {i, 2, 23}]; a (* Michael De Vlieger, Aug 21 2017 *)

CROSSREFS

Cf. A118247, A118249, A118252.

Sequence in context: A293164 A230298 A000480 * A209198 A282343 A099076

Adjacent sequences:  A118248 A118249 A118250 * A118252 A118253 A118254

KEYWORD

easy,nonn,base

AUTHOR

Leroy Quet, Apr 18 2006

EXTENSIONS

More terms from Joshua Zucker, Jul 27 2006

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 March 25 12:11 EDT 2019. Contains 321470 sequences. (Running on oeis4.)