OFFSET
0,5
FORMULA
For n > 0, a(n) = A333768(n) - 1.
EXAMPLE
The binary expansion of 148 is (1,0,0,1,0,1,0,0), so a(148) = 1.
MATHEMATICA
stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n, 2]], 1], 0]]//Reverse;
Table[If[n==0, 0, Min@@stc[n]-1], {n, 0, 100}]
CROSSREFS
Positions of first appearances (ignoring index 0) are A000079.
Positions of terms > 0 are A022340.
Minimum prime index is A055396.
The maximum part minus 1 is given by A087117.
All of the following pertain to compositions in standard order (A066099):
- Length is A000120.
- Compositions without 1's are A022340.
- Sum is A070939.
- Product is A124758.
- Runs are counted by A124767.
- Strict compositions are A233564.
- Constant compositions are A272919.
- Runs-resistance is A333628.
- Maximum is A333766.
- Minimum is A333768.
- Weakly decreasing compositions are A114994.
- Weakly increasing compositions are A225620.
- Strictly decreasing compositions are A333255.
- Strictly increasing compositions are A333256.
KEYWORD
nonn
AUTHOR
Gus Wiseman, Apr 06 2020
STATUS
approved