A132781 Numbers not containing '1010' in binary representation.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 14, 15, 16, 17, 18, 19, 22, 23, 24, 25, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 44, 45, 46, 47, 48, 49, 50, 51, 54, 55, 56, 57, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 75, 76, 77, 78, 79, 88, 89, 91, 92, 93

Offset

1,3

Comments

Complement of A132782; A000225 is a subsequence.

Links

R. Zumkeller, Table of n, a(n) for n = 1..10000

Index entries for sequences related to binary expansion of n

Mathematica

Select[Range[0, 100], FreeQ[Partition[IntegerDigits[#, 2], 4, 1], {1, 0, 1, 0}]&] (* Harvey P. Dale, Mar 07 2015 *)

Crossrefs

Sequence in context: A190221 A239215 A055571 * A318275 A173646 A274125

Adjacent sequences: A132778 A132779 A132780 * A132782 A132783 A132784

Keyword

nonn,base

Author

Reinhard Zumkeller, Aug 30 2007

Status

approved