login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A048717
Binary expansion matches ((0)*00(1*)11)*(0*).
8
0, 3, 6, 7, 12, 14, 15, 24, 28, 30, 31, 48, 51, 56, 60, 62, 63, 96, 99, 102, 103, 112, 115, 120, 124, 126, 127, 192, 195, 198, 199, 204, 206, 207, 224, 227, 230, 231, 240, 243, 248, 252, 254, 255, 384, 387, 390, 391
OFFSET
0,2
COMMENTS
In binary expansion, 1-bits occur only in groups of two or more, separated from other such groups by at least two 0-bits.
Integers that satisfy A048727(n) = 3*n.
MATHEMATICA
filterQ[n_] := !MatchQ[IntegerDigits[n, 2], {1}|{1, 0, ___}|{___, 0, 1}|{___, 1, 0, 1, ___}|{___, 0, 1, 0, ___}];
Select[Range[0, 400], filterQ] (* Jean-François Alcover, Dec 31 2020 *)
CROSSREFS
Row 3 of A115872. Superset of A048719. Cf. A048733.
Sequence in context: A144795 A364292 A077459 * A175332 A022434 A242666
KEYWORD
nonn,base,easy
AUTHOR
Antti Karttunen, Mar 30 1999
STATUS
approved